RosettaCodeData/Task/Loops-For/DWScript/loops-for.dw
2013-04-11 11:14:19 -07:00

7 lines
107 B
Text

var i, j : Integer;
for i := 1 to 5 do begin
for j := 1 to i do
Print('*');
PrintLn('');
end;