program b1;
uses crt;
var a,b:longint;
begin
clrscr;
writeln('Nhap he so a');read(a);
writeln('Nhap he so b');read(b)
if (a<>0) then write('Phuong trinh',a:10:2,'x+',b:10:2,' co nghiem x= ',-b/a:10:2)
else if (a=0) and (b=0) then write('Co vo so nghiem')
else write('Phuong trinh vo nghiem');
readln
end.