RosettaCodeData/Task/Loops-Downward-for/PL-I/loops-downward-for.pli
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

3 lines
49 B
Text

do i = 10 to 0 by -1;
put skip list (i);
end;