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;