我最近也在学.一起学呀. !!这个地方看起来好难!!

怎么没有大虾解答啊？

剃归就是函数调用自己:
列：
SUB 函数(参数)
语句
条件
调用 函数(参数)
语句
语句
End SUB

我也是一位初学者，我对递归方面的问题也是不清楚，希望能一起学，可以吗？

DECLARE SUB TiGui (Max AS INTEGER, Man AS INTEGER)
DECLARE SUB Split (x$(), y2$, z$)
SCREEN 12
CONST TRUE = -1
CONST FALSE = 0
DIM Code AS STRING
DO
INPUT "", Code
Code = LCASE$(Code)
REDIM Dm(LEN(Code)) AS STRING
Split Dm(), Code, " "
TiGui VAL(Dm(1)), VAL(Dm(2))
LOOP UNTIL LCASE$(Code) = "end"

SUB Split (x$(), y2$, z$)
y$ = y2$ + z$
l% = LEN(z$)
i% = INSTR(y$, z$)
j% = 1
DO WHILE i%
   k% = k% + 1
   x$(k%) = MID$(y$, j%, i% - j%)
   j% = i% + l%
   i% = INSTR(j%, y$, z$)
LOOP
x$(0) = STR$(k%)
END SUB

SUB TiGui (Max AS INTEGER, Man AS INTEGER)
STATIC TMax AS INTEGER
STATIC TMan AS INTEGER
TMax = Max: TMan = Man
IF TMan >= TMax THEN
PRINT TMan
TMan = TMan - 1
TiGui TMax, TMan
END IF
END SUB






上面的程序是一个模拟循环的程序；
输入
1 30
输出
30
29
28
27
26
25
...
1

这是一个运用剃归的程序；
剃归的过程在TiGui过程里面；
不过数字不能太大；
列：
1 100 可以；
1 110 就不行了