RosettaCodeData/Task/Loops-Continue/Sather/loops-continue.sa
2023-07-01 13:44:08 -04: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;