RosettaCodeData/Task/Loops-Do-while/F-Sharp/loops-do-while-1.fs
2023-07-01 13:44:08 -04:00

4 lines
75 B
FSharp

let rec loop n =
printfn "%d " n
if (n+1)%6 > 0 then loop (n+1)
loop 0