program Giai_phuong_trinh;
uses crt;
var a,b:real;
begin
write('Nhap a:'); readln(a);
write('Nhap b:'); readln(b);
if (a<>0) then writeln('Phuong trinh',a:5:2,'x+',b:5:2,'=0',' co nghiem la:' -b/a:5:2)
else
if b=0 then writeln('Phuong trinh co vo so nghiem')
else writeln('Phuong trinh vo nghiem');
readln
end.