RosettaCodeData/Task/Find-limit-of-recursion/BASIC/find-limit-of-recursion-3.basic
2017-09-25 22:28:19 +02:00

5 lines
66 B
Text

10 LET D=0
20 GOSUB 30
30 PRINT AT 0,0;D
40 LET D=D+1
50 GOSUB 30