▒
program haha
var
a,b,c,x,k,z:real;
│║const ▒
│║ ▒
│║ y=0 ▒
│║ ▒
│║begin ▒
│║ ▒
│║ writeln(*a=*,*b=*,*c=*); ▒
│║ ▒
│║ readln(*a=*,*b=*,*c=*); ▒
│║ ▒
│║ z:=b*b-4*a*c; ▒
│║ ▒
│║ if z<0 then writeln(*no jie*); ▒
┌║ ▒
│║ else if z=0 then writeln(*x=k=-b+sqrt(z)/2a*);
│║
│║ else if z>0 then writeln(*x=-b-sqrt(z)/2a*,*k=-b+sqrt(z)/2a*);
end 哪错了

顶阿

顶阿

没人吗

人工置顶

顶

怎么没人阿

=号。。。。编程里用<>,=是判断用的。。。。。

end后加.