Loops/Downward for: Difference between revisions

From Rosetta Code
Content added Content deleted
(Forth, JavaScript, Logo)
Line 13: Line 13:
std::cout << i << "\n";
std::cout << i << "\n";
</cpp>
</cpp>

=={{header|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 ;


=={{header|Java}}==
=={{header|Java}}==
Line 18: Line 22:
System.out.println(i);
System.out.println(i);
}</java>
}</java>

=={{header|JavaScript}}==
<javascript>for (var i=10; i>=0; --i) print(i);</javascript>

=={{header|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]


=={{header|MAXScript}}==
=={{header|MAXScript}}==

Revision as of 17:43, 22 April 2008

Task
Loops/Downward for
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>

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 ;

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>

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>

Python

<python> for i in xrange(10, -1, -1):

   print i

</python>

UnixPipes

yes \ |cat -n |head -n 10 | tac