1111

回复 @father :
just so so

so easy

我当年居然1A!

零次项为零输出了个+0xswl

注意细节!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

好恶心。。。

一次方。。。真的很坑。。。

注意细节..（什么细节自己WA了就知道了我才不会说呢哈哈哈）
同为6次

细节懒得处理，知道有错也交代码是什么心态。=-=
这种细节题就是我的克星·-· 。。 交了6次。。

认真读题。。。。

X^1好黑、、

program poly;
var
n,i,a:longint;
begin
assign(input,'poly.in');
reset(input);
assign(output,'poly.out');
rewrite(output);
readln(n);
for i:=1 to n+1 do
begin
read(a);
if a=0 then continue;
if (a<0)and(a<>-1) then write(a);
if a=-1 then write('-');
if (a>0)and(a<>1) then begin if i>1 then write('+');
write(a); end;
if a=1 then begin if i>1 then write('+'); if n-i+1=0 then write(a);
end;
if n-i+1>1 then begin write('x^'); write(n-i+1); end;
if n-i+1=1 then write('x');
end;
if a=-1 then write('1');!!!!!!!
close(input);
close(output);
end.回复 @BonnenuIt゛浅时�� - :

program poly;
var
n,i,a:longint;
begin
assign(input,'poly.in');
reset(input);
assign(output,'poly.out');
rewrite(output);
readln(n);
for i:=1 to n+1 do
begin
read(a);
if a=0 then continue;
if (a<0)and(a<>-1) then write(a);
if a=-1 then write('-');
if (a>0)and(a<>1) then begin if i>1 then write('+');
write(a); end;
if a=1 then begin if i>1 then write('+'); if n-i+1=0 then write(a);
end;
if n-i+1>1 then begin write('x^'); write(n-i+1); end;
if n-i+1=1 then write('x');
end;
close(input);
close(output);
end.