RosettaCodeData/Task/Find-limit-of-recursion/BASIC/find-limit-of-recursion-1.basic
2016-12-05 22:15:40 +01:00

4 lines
94 B
Text

100 PRINT "RECURSION DEPTH"
110 PRINT D" ";
120 LET D = D + 1
130 GOSUB 110"RECURSION