RosettaCodeData/Task/Loops-For/PL-I/loops-for-1.pli

7 lines
85 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
do i = 1 to 5;
do j = 1 to i;
put edit ('*') (a);
end;
put skip;
end;