Logo

Programming-Idioms

# 256 Count backwards
Print the numbers 5, 4, ..., 0 (included), one line per number.
New implementation

Be concise.

Be useful.

All contributions dictatorially edited by webmasters to match personal tastes.

Please do not paste any copyright violating material.

Please try to avoid dependencies to third-party libraries and frameworks.

Other implementations 
for A in reverse 0 .. 5 loop
   Put_Line (A'Image);
end loop;
for (int i = 5; i >= 0; i--) {
	printf("%d\n", i);
}
(doseq [n (range 5 0 -1)]
  (println n))
for (int i = 5; i >= 0; --i) {
	std::cout << i;
}
using System;
for (int i = 5; i >= 0; i--)
{
    Console.WriteLine(i);
}
for (int i = 5; i >= 0; i--) {
  print(i);
}
do i=5,0,-1
  print *,i
end do
import "fmt"
for i := 5; i >= 0; i-- {
	fmt.Println(i)
}
import Control.Monad (forM_)
forM_ (reverse [0..5]) print
foldl  (\res x-> x:res) [] [0..5]
for (let i = 5; i >= 0; i--) {
  console.log(i)
}
import static java.lang.System.out;
import static java.util.stream.IntStream.iterate;
iterate(5, x -> x - 1)
    .limit(6)
    .forEach(out::println);
import static java.lang.System.out;
for (int i = 5; i != -1; out.println(i--));
for(int i=5 ; i>=0 ; i--) {
    System.out.println(i);
}
(dotimes (i 6) (print (- 5 i)))
for i=5, 0, -1 do
	print(i)
end
$values = range(0, 5);
$valuesReversed = array_reverse($values);
foreach($valuesReversed as $value)
{
    printf("%s\n", $value);
}
for i := 5 downto 0 do writeln(i);
print "$_\n" for reverse (0..5);
for value in reversed(range(6)):
    print(value)
for value in range(6):
    print(5 - value)
value = 5
while value != -1:
    print(value)
    value -= 1
from os import linesep
from string import digits
print(linesep.join(reversed(digits[:6])))
for i in range(5, -1, -1):
    print(i)
5.downto(0){|n| puts n }
for i in (0..=5).rev() {
    println!("{}", i);
}
(0..=5).rev().for_each(|i| println!("{}", i));

(let loop ([x 5])
  (when (>= x 0)
    (display x)
    (newline)
    (loop (sub1 x))))
5 to: 0 by: -1 do: [:i | Transcript showln: i asString].
Imports System
For i = 5 To 0 Step -1
    Console.WriteLine(i)
Next

Preview