RosettaCodeData/Task/Loops-For/PL-I/loops-for-2.pli
2023-07-01 13:44:08 -04:00

3 lines
64 B
Text

do i = 1 to 5;
put skip edit (('*' do j = 1 to i)) (a);
end;