一元多项式运算器

• 一.问题描述：设计一个一元多项式P=p0+p1x+p2x*2......+pnx*n的合适的数据结构，并支持两个多项式的下列运算：1.建立；2.输出；3.相加；4.相减；5.相乘；6.求导。
• 二.数据结构：
• typedef struct node
• {
•        float xishu;
• int zhishu;
  struct node *next;
  }Lnode;
• 三.方案设计：
• 1.建立多项式：通过键盘输入多项式的系数和指数，用尾插法建立一元多项式的链表。本程序的指数必须由小到大输入，想要结束，系数输零即可。
• 2.输出多项式：从单链表的第一个元素开始，逐项读出系数和指数，按多项式的形式输出即可。
• 3.两个多项式相加：以单链表pa，pb分别表示两个单链表A，B，A+B的求和问题，就等同于单链表的插入问题，构造一个pc来保存pa+pb的值，为实现处理，用qa，qb，qc分别来表示pa，pb，pc的当前项，由此，得到以下运算过则：
• qa->exp<qb->exp,将qa复制到qc当中，qa指针后移
• qa->exp=qb->exp,则将两个节点中的系数相加，当和不为0时，qc的系数等于qa和qb的系数之和，当和为0时，qa，qb指针后移。
• qa->exp>qb-exp,将qb复制到qc当中，qb指针后移

• 4.两个多项式相减：和加类似，只需输入系数时奖多项式二的系数改为负的即可，再进行加运算。
• 5.两个多项式相乘：和多项式相加类似，需要使用多项式pa中的每一项和pb中的每一项进行相乘，然后进行多项式相加操作。
• 6.多项式求导：多项式当前指数为零，则其导数为零；当前结点指数不为零，则其导数的系数为当前节点指数乘以系数，指数为当前结点指数减一

#include<stdio.h>

#include<stdlib.h>
#include<conio.h>
#include<string.h>
typedef struct node
{
float xishu;
int zhishu;
struct node *next;
}Lnode;
Lnode *create()
{
Lnode *H;
H=(Lnode*)malloc(sizeof(Lnode));
H->next=NULL;
Lnode *r=H,*s;
int y;
float x;
printf("请输入系数和指数：\n");
scanf("%f %d",&x,&y);
while(x!=0.0)
{
s=(Lnode*)malloc(sizeof(Lnode));
s->xishu=x;
s->zhishu=y;
s->next=r->next;
r->next=s;
r=s;
scanf("%f %d",&x,&y);
} 
s->next=NULL; 
return H;
}
/******************************************************/
void print(Lnode *H)                               //输出多项式 
{
Lnode *p=H->next;
int flag=1;
if(!p)
{
printf("0");
return;
getch();
}
while(p)
{
if(p->xishu>0&&flag!=1) putchar('+');
if(p->xishu!=1&&p->xishu!=-1)
{
printf("%g",p->xishu);
if(p->zhishu==1) putchar('X');
else if(p->zhishu) printf("X^%d",p->zhishu);
}
else
{
if(p->xishu==1)
{
if(!p->zhishu) printf("1");
else if(p->zhishu==1) printf("X");
else printf("X^%d",p->zhishu);
}
if(p->xishu==-1)
{
if(!p->zhishu) printf("-1");
else if(p->zhishu==-1) printf("-X");
else printf("-X^%d",p->zhishu);
}
}
p=p->next;
flag++;
}
printf("\n");
}
/**************************************************************/
Lnode *MPLUS(Lnode*pa,Lnode *pb)                        //多项式加法 
{
Lnode *Pa,*Pb,*Pc,*pc,*qc;
Pa=pa->next;
Pb=pb->next;
pc=(Lnode*)malloc(sizeof(Lnode));
pc->next=NULL;
Pc=pc; 
while(Pa!=NULL&&Pb!=NULL)
{
qc=(Lnode*)malloc(sizeof(Lnode));
if(Pa->zhishu<Pb->zhishu)
{
qc->xishu=Pa->xishu;
qc->zhishu=Pa->zhishu;
Pa=Pa->next; 
}
    else if(Pa->zhishu==Pb->zhishu)
    {
      qc->xishu=Pa->xishu+Pb->xishu;
      qc->zhishu=Pa->zhishu;
      Pa=Pa->next;
      Pb=Pb->next;
    } 
    else 
    {
        qc->xishu=Pb->xishu;
qc->zhishu=Pb->zhishu;
Pb=Pb->next;
}
if(qc->xishu!=0)
{
qc->next=pc->next;
pc->next=qc;
pc=qc;
}
else free(qc);
}
while(Pa != NULL)
{
qc=(Lnode*)malloc(sizeof(Lnode));
qc->xishu=Pa->xishu;
qc->zhishu=Pa->zhishu;
Pa=Pa->next;
qc->next=pc->next;
pc->next=qc;
pc=qc;
}
while(Pb != NULL)
{
qc=(Lnode*)malloc(sizeof(Lnode));
qc->xishu=Pb->xishu;
qc->zhishu=Pb->zhishu;
Pb=Pb->next;
qc->next=pc->next;
pc->next=qc;
pc=qc;
}
return Pc;
}
/**************************************************************/
Lnode *MDele(Lnode *pa,Lnode *pb)                   //多项式减法     ；
{
Lnode *h=pb;
Lnode *p=pb->next;
    Lnode *pd;
while(p)
{
p->xishu*=-1.0;
p=p->next;
    } 
        pd = MPLUS(pa,h);
   for(p=h->next;p;p=p->next)
        p->xishu*=-1;                                     
    return pd;
} 
/********************************************************************/
Lnode *multi(Lnode*pa,Lnode *pb)                        //多项式乘法 
{
Lnode *Pa,*Pb,*Pc,*pc,*qc;
Pa=pa->next;
Pb=pb->next;
pc=(Lnode*)malloc(sizeof(Lnode));
pc->next=NULL;
Pc=pc; 
while(Pa!=NULL)
{
Pb=pb->next;
while(Pb!=NULL)
{
qc=(Lnode*)malloc(sizeof(Lnode));
qc->xishu=Pa->xishu*Pb->xishu;
qc->zhishu=Pa->zhishu+Pb->zhishu;
qc->next=pc->next;
pc->next=qc;
pc=qc;
Pb=Pb->next;
  }
if(qc->xishu==0)  
free(qc); 
   Pa=Pa->next;
}
return Pc;
}
Lnode *F(Lnode *pa)           //多项式求导 
{
Lnode *P,*qc,*Pc,*pc;
pc=(Lnode*)malloc(sizeof(Lnode));
pc->next=NULL;
P=pa->next;
Pc=pc;
while(P!=NULL)
{
qc=(Lnode*)malloc(sizeof(Lnode));
if(P->zhishu!=0)
{
qc->zhishu=P->zhishu-1;
qc->xishu=P->xishu*P->zhishu;
   }
   if(P->zhishu==0)
   {
qc->xishu=P->xishu;
qc->zhishu=0;
   }
   if(qc->xishu!=0)
   {
   qc->next=pc->next;
pc->next=qc;
pc=qc;
}
if(qc->xishu==0)
free(qc);
P=P->next; 
    }
    return Pc;
} 
void main()                                   //多项式必须按次数由低到高或由高到低输入 
{
Lnode *pa,*pb,*Plus,*jian,*Multi,*f;      //输入多项式 
printf("输入多项式一:\n");            
pa=create();
printf("多项式一如下:\n");
printf("Pa=");
print(pa);
    printf("\n");
    
printf("输入多项式二:\n");
    pb=create();
printf("多项式二如下:\n");
printf("Pb=");
print(pb);
getch();

printf("\n");                    //多项式加法
Plus=MPLUS(pa,pb);
printf("两式相加结果为:\n");
printf("Pc=");
print(Plus);                     
                               
printf("两式相减的结果为:\n");         //多项式减法 
printf("Pc=");
jian=MDele(pa,pb);
print(jian); 
printf("\n"); 

printf("两式相乘的结果为:\n");           //多项式乘法 
printf("Pc=");
Multi=multi(pa,pb);
print(Multi);   

printf("\n一式求导得:\n");           //多项式求导 
printf("Pa'=");
f=F(pa) ;
print(f);   
printf("\n");   

printf("二式求导得:\n");           //多项式求导 
printf("Pb'=");
f=F(pb);
print(f);     
}