(辽师大版)六年级信息技术上册课件 递归调用.pptVIP

递归调用 使用递归求解问题，通常可以将一个比较大的问题层层转化为一个与原问题相类似的、规模较小的问题进行求解，最终达到对原问题的求解。 用递归计算n！ n！可以由下列公式表示： n！ Program p7_20(input,output); var n:integer; s:integer; Function fac(a:integer):integer; Begin if a=0 then fac:=1 else fac:=a*fac(a-1); End; Begin Readln(n); S:=fac(n); Writeln(n,’!=’,s) End. 能用递归算法求解的问题一般应该满足如下要求： 符合递归的描述：需要解决的问题可以化为子问题求解，而子问题求解的方法与原问题相同，只是数量增大或减少； 递归调用的次数是有限的； 必须有递归结束的条件。 用递归方法求两个数m和n 的最大公约数 Program p7_21(input,output); Var m,n,g:integer; Function gcd(m,n:integer):integer; var r:integer; begin r:=m mod n; if r=0 then gcd:=n