Loops/Downward for: Difference between revisions
m (Added ColdFusion implementation.) |
|||
Line 15: | Line 15: | ||
=={{header|ColdFusion}}== |
=={{header|ColdFusion}}== |
||
With tags: |
|||
<cfloop index = "i" from = "10" to = "0" step = "-1"> |
<cfloop index = "i" from = "10" to = "0" step = "-1"> |
||
#i# |
#i# |
||
</cfloop> |
</cfloop> |
||
With script: |
|||
<cfscript> |
|||
for( i = 10; i <= 0; i-- ) |
|||
{ |
|||
writeOutput( i ); |
|||
} |
|||
</cfscript> |
|||
=={{header|D}}== |
=={{header|D}}== |
Revision as of 22:12, 29 July 2008
You are encouraged to solve this task according to the task description, using any language you may know.
Write a for loop which writes a countdown from 10 to 0.
Ada
<ada> for I in reverse 0..10 loop
Put_Line(Integer'Image(I));
end loop; </ada>
C++
<cpp> for(int i = 10; i >= 0; --i)
std::cout << i << "\n";
</cpp>
ColdFusion
With tags:
<cfloop index = "i" from = "10" to = "0" step = "-1"> #i# </cfloop>
With script:
<cfscript> for( i = 10; i <= 0; i-- ) { writeOutput( i ); } </cfscript>
D
<d>for(int i = 10; i >= 0; --i) writefln(i)</d> Foreach Range Statement since D2.003 <d>foreach_reverse(i ; 0..10+1) writefln(i) ;</d>
Forth
Unlike the incrementing 10 0 DO-LOOP, this will print eleven numbers. The LOOP words detect crossing the floor of the end limit.
: loop-down 0 10 do i . -1 +loop ;
Fortran
DO i = 10, 0, -1 WRITE(*, *) i END DO
Java
<java>for(i = 10; i >= 0; --i){
System.out.println(i);
}</java>
JavaScript
<javascript>for (var i=10; i>=0; --i) print(i);</javascript>
Logo
If the limit is less than the start, then FOR decrements the control variable. Otherwise, a fourth parameter could be given as a custom increment.
for [i 10 0] [print :i]
MAXScript
for i in 10 to 0 by -1 do print i
OCaml
<ocaml>for i = 10 downto 0 do
Printf.printf "%d\n" i
done</ocaml>
Pascal
<pascal> for i := 10 downto 0 do
writeln(i);
</pascal>
Perl
<perl>foreach (reverse 0..10) {
print "$_\n";
}</perl>
Pop11
lvars i; for i from 10 by -1 to 0 do printf(i, '%p\n'); endfor;
Python
<python> for i in xrange(10, -1, -1):
print i
</python>
UnixPipes
yes \ |cat -n |head -n 10 | tac