6.40.txt

数据结构实验 如下： Status Fibonacci(int k, int m, int &f) /* 求k阶斐波那契序列的第m项的值f */

void InOrder(BiPTree PT, void (*visit)(TElemType))
/* 不使用栈，非递归中序遍历二叉树bt，  */
/* 对每个结点的元素域data调用函数visit */
{
    BiPTNode *p;
    p=PT;
    while(p->lchild)p=p->lchild;
    
    while(p!=NULL){
        visit(p->data);
        if(p->rchild){
            p=p->rchild;
            while(p->lchild)p=p->lchild;
        }
        else if(p->parent->lchild==p&&p->parent)
                    p=p->parent;
        else   {
            p=p->parent;
            while(p->parent->rchild==p&&p->parent)
            p=p->parent;
            p=p->parent;
        }
  }
}