递归的栈模拟

数据结构：
struct PROC//进程结构
{
    para; //状态参数（可有多个）
    bs;//接收返回值
    inoutp;//进出位置
};
算法：
初进程入栈;
while(栈非空)
{
    继续执行栈顶进程;
    if(遇洞口)
    {
        记下入口位置;
        构造新进程并入栈;
    }else if(遇出口)
    {
        计算并暂存返回值;
        删除栈顶进程;
        父进程接收返回值;
    }
}

下面是由简单到复杂的三个例子：

例1：将汉诺塔递归函数hanoi转成非递归函数nhanoi。

此例特点是无返回值。

#include <iostream> #include <stack> #include <string> using namespace std; void hanoi(int n,string stTower,string varTower,string tgTower)//递归函数 {//0 //语段0: if(n==1) { cout<<"disk"<<1<<":"<<stTower<<"->"<<tgTower<<endl; return; } hanoi(n-1,stTower,tgTower,varTower);//1 //语段1: cout<<"disk"<<n<<":"<<stTower<<"->"<<tgTower<<endl; hanoi(n-1,varTower,stTower,tgTower);//2 //语段2: } struct PROC { int n;//进程参数 string stTower;//进程参数 string varTower;//进程参数 string tgTower;//进程参数 int inoutp;//进出位置 init(int _n,string _stTower,string _varTower,string _tgTower,int _inoutp) {n=_n;stTower=_stTower;varTower=_varTower;tgTower=_tgTower;inoutp=_inoutp;}; }; void push(stack<PROC>&stac,int n,string stTower,string varTower,string tgTower,int inoutp) { PROC tproc; tproc.init (n,stTower,varTower,tgTower,inoutp); stac.push(tproc); } void nhanoi(int n,string stTower,string varTower,string tgTower)//非递归函数 { stack<PROC> stac;//进程栈 push(stac,n,stTower,varTower,tgTower,0);//初进程入栈 while(!stac.empty ())//直到栈空 { //为栈顶各域义别名(仅是为了后面书写方便) int&n=stac.top().n; string&stTower=stac.top().stTower ; string&varTower=stac.top().varTower ; string&tgTower=stac.top().tgTower ; int&inoutp=stac.top().inoutp ; switch(inoutp) { case 0: //语段0: if(n==1) { cout<<"disk"<<1<<":"<<stTower<<"->"<<tgTower<<endl; //返回 stac.pop();//删除栈顶 continue;//跳到下次循环 } //进洞 inoutp =1;//记下入口位置 push(stac,n-1,stTower,tgTower,varTower,0);//新进程入栈 break; case 1: //语段1: cout<<"disk"<<n<<":"<<stTower<<"->"<<tgTower<<endl; //入洞 inoutp =2; push(stac,n-1,varTower,stTower,tgTower,0); break; case 2: //语段2: //返回 stac.pop(); break; } } } main() { cout<<"递归:"<<endl; hanoi(3,"stTower","varTower","tgTower"); cout<<"非递归:"<<endl; nhanoi(3,"stTower","varTower","tgTower"); }

例2：将计算阶乘的递归函数fac规范成facc再转成非递归函数nfac：

此例特点是有返回值。

#include <iostream> #include <stack> using namespace std; int fac(int n)//递归函数 { if(n==0)return 1; return n*fac(n-1); } int facc(int n)//规范后的递归函数 {//0 //语段0: if(n==0)return 1; int bs=fac(n-1);//1 //语段1: return n*bs; } struct PROC { int n;//进程参数 int bs;//接收返回值 int inoutp;//进出位置 init(int _n,int _bs,int _inoutp) {n=_n;bs=_bs,inoutp=_inoutp;}; }; void push(stack<PROC>&stac,int n,int bs,int inoutp) { PROC tproc; tproc.init (n,bs,inoutp); stac.push (tproc); } int nfac(int n)//非递归函数 { stack<PROC> stac;//进程栈 push(stac,0,0,0);//接收层 push(stac,n,0,0);//初状态入栈 while((int)stac.size ()!=1)//直到只剩接收层 { //为栈顶各域定义别名(为后面书写方便) int&n=stac.top().n; int&bs=stac.top().bs; int&inoutp=stac.top().inoutp; switch(inoutp)//现身位置 { case 0: //语段0: if(n==0) { //返回 int tbs=1;//暂存返回值 stac.pop ();//删除栈顶 stac.top().bs=tbs;//父进程接收返回值 continue;//跳到下次循环 } //进洞 inoutp=1;//记下入口位置 push(stac,n-1,0,0);//新状态入栈 break; case 1: //语段1: //返回 int tbs=n*bs; stac.pop (); stac.top().bs=tbs; break; } }//最终结果已存入接收层 return stac.top().bs; } main() { cout<<fac(5)<<endl; cout<<facc(5)<<endl; cout<<nfac(5)<<endl; }

例3:f(1)=1，f(n)=((n-1)f(1)+(n-2)f(2)+...+f(n-1))+f(n-1)。

将计算f(n)的递归函数f规范成函数fc再转成非递归函数nf:

此例特点是有返回值，而且是“循环入口”结构。

#include <iostream> #include <stack> using namespace std; int f(int n)//递归函数 { if(n==1)return 1; int s=0; for(int i=1;i<=n-1;i++) { s+=(n-i)*f(i); } s+=f(n-1); return s; } int fc(int n)//规范后的递归函数 {//0 //语段0: if(n==1)return 1; int s=0; int i=1; beg:if(i<=n-1) { int bs=f(i);//1 //语段1: s+=(n-i)*bs; i++; goto beg; } int bs=f(n-1);//2 //语段2: s+=bs; return s; } struct PROC { int n;//进程参数 int s;//进程辅助参数 int i;//进程辅助参数 int bs;//接收返回值 int inoutp;//进出位置 init(int _n,int _s,int _i,int _bs,int _inoutp) {n=_n;s=_s;i=_i;bs=_bs;inoutp=_inoutp;}; }; void push(stack<PROC>&stac,int n,int s,int i,int bs,int inoutp) { PROC tproc; tproc.init (n,s,i,bs,inoutp); stac.push (tproc); } int nf(int n)//非递归函数 { stack<PROC> stac;//进程栈 push(stac,0,0,0,0,0);//接收层 push(stac,n,0,0,0,0);//初进程入栈 while((int)stac.size ()!=1)//直到只剩接收层 { //为栈顶各域定义别名(为后面书写方便) int&n=stac.top().n; int&s=stac.top().s; int&i=stac.top().i; int&bs=stac.top().bs; int&inoutp=stac.top().inoutp; switch(inoutp)//现身位置 { case 0: //语段0: if(n==1) { //返回 int tbs=1; stac.pop(); stac.top().bs=tbs; continue; } s=0; i=1; if(i<=n-1) { //进洞 inoutp=1; push(stac,i,0,0,0,0); continue; } //进洞 inoutp=2; push(stac,n-1,0,0,0,0); break; case 1: //语段1: s+=(n-i)*bs; i++; if(i<=n-1) { //进洞 inoutp =1; push(stac,i,0,0,0,0); continue; } //进洞 inoutp=2; push(stac,n-1,0,0,0,0); break; case 2: //语段2: s+=bs; //返回 int tbs=s; stac.pop(); stac.top().bs=tbs; break; } }//最终结果已存入接收层 return stac.top().bs; } main() { cout<<f(5)<<endl; cout<<fc(5)<<endl; cout<<nf(5)<<endl; }