RosettaCodeData/Task/Loops-Downward-for/Ada/loops-downward-for.ada
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

3 lines
69 B
Ada

for I in reverse 0..10 loop
Put_Line(Integer'Image(I));
end loop;