12 lines
193 B
Text
12 lines
193 B
Text
include "cowgol.coh";
|
|
|
|
var n: uint8 := 0;
|
|
while n < 10 loop
|
|
n := n + 1;
|
|
print_i8(n);
|
|
if n % 5 == 0 then
|
|
print_nl();
|
|
continue;
|
|
end if;
|
|
print(", ");
|
|
end loop;
|