多项式相加

【培训试题】多项式相加(normal)

 

Time Limit:1000MS  Memory Limit:65536K
Total Submit:1109 Accepted:212

Description

求两个一元多项式的和。输入多项式方式为，多项式项数，每项系数；如求多项式2x2+3x-4和多项式2x+2的和。

Input

第一行，第一个多项式的系数（最多为200），指数（最多为200） 
第二行，第二个多项式的系数（最多为200），指数（最多为200） 

Output

两个多项式的和

Sample Input

2 2 3 1 -4 02 1 2 0

Sample Output

2x^2+5x-2

Hint

注意输出格式

【解析】

是一个很简单的模拟，只需统计各次项的系数再按要求输出即可。但是这道题可以用来锻炼自己的编程能力和细心程度。Hint 专门提示了注意输出格式，但我还是没有一次AC。下面是几条需要注意的地方。

• 从高次向低次依次输出。
• 第一项若为正，不能输出'+'号，否则必须输出。
• 对于除第一项的任意一项，若系数为1，则只输出'+'；对不除第一项的任意一项，若系数为-1，则只输出'-'。
• 对于次数为1的项，不能输出'^1'。
• 最后一定要换行。

程序依旧写丑了，但是看起来比较明白，KISS原则。

var        m:array[0..200] of longint;        i,j,a,b:longint;begin        //assign(input,'1006.in');reset(input);        while not eoln do                begin                        read(a,b);                        inc(m[b],a);                end;        readln;        while not eoln do                begin                        read(a,b);                        inc(m[b],a);                end;        for i:=200 downto 0 do                begin                        if m[i]<>0 then                                begin                                        j:=i;                                        break;                                end;                end;        if j<>0 then                begin                        if j>1 then                                begin                                        if m[j]>0 then                                                begin                                                        if m[j]>1 then                                                                write(m[j],'x^',j)                                                        else                                                                write('x^',j);                                                end                                        else                                                begin                                                        if m[j]<-1 then                                                                write(m[j],'x^',j)                                                        else                                                                write('-x^',j);                                                end;                                end                        else                                begin                                        if (m[j]>1) or (m[j]<-1) then                                                write(m[j],'x')                                        else                                                begin                                                        if m[j]=-1 then                                                                write('-x')                                                        else                                                                write('x');                                                end;                                end;                end        else                begin                        writeln(m[j]);                        halt;                end;        for i:=j-1 downto 0 do                if m[i]<>0 then                        begin                                if i=0 then                                        begin                                                if m[i]>0 then                                                        writeln('+',m[i])                                                else                                                        writeln(m[i]);                                                halt;                                        end;                                if i=1 then                                        begin                                                if m[i]>0 then                                                        begin                                                                if m[i]>1 then                                                                        write('+',m[i],'x')                                                                else                                                                        write('+x');                                                        end                                                else                                                        begin                                                                if m[i]<-1 then                                                                        write(m[i],'x')                                                                else                                                                        write('-x');                                                        end;                                                continue;                                        end;                                if m[i]>0 then                                        begin                                                if m[i]>1 then                                                        write('+',m[i],'x^',i)                                                else                                                        write('+x^',i);                                        end                                else                                        begin                                                if m[i]<-1 then                                                        write(m[i],'x^',i)                                                else                                                        write('-x^',i);                                        end;                        end;        writeln;end.