RosettaCodeData/Task/Find-limit-of-recursion/PureBasic/find-limit-of-recursion-1.basic
2023-07-01 13:44:08 -04:00

6 lines
72 B
Text

Procedure Recur(n)
PrintN(str(n))
Recur(n+1)
EndProcedure
Recur(1)