RosettaCodeData/Task/Loops-Continue/F-Sharp/loops-continue-1.fs

7 lines
95 B
Forth

for i in 1 .. 10 do
printf "%d" i
if i % 5 = 0 then
printf "\n"
else
printf ", "