RosettaCodeData/Task/Loops-Continue/Sather/loops-continue.sa
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

13 lines
185 B
Text

class MAIN is
main is
i:INT;
loop i := 1.upto!(10);
#OUT + i;
if i%5 = 0 then
#OUT + "\n";
else
#OUT + ", ";
end;
end;
end;
end;