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;