RosettaCodeData/Task/Loops-Downward-for/Ada/loops-downward-for.adb
2026-04-30 12:34:36 -04:00

3 lines
69 B
Ada

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