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

4 lines
94 B
Text

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