RosettaCodeData/Task/Loops-For/DWScript/loops-for.dw

8 lines
107 B
Text
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
var i, j : Integer;
for i := 1 to 5 do begin
for j := 1 to i do
Print('*');
PrintLn('');
end;