var a,b,x : real;
begin
readln (a,b);
if a<>0 then
begin
x:=-b/a;
writeln('Ecuatia are o singura radacina', x);
end;
if (a=0)and (b=0) then
writeln('Ecuatia are o multime infinita de radacini');
if (a=0) and (b<>0) then
writeln ('Ecuatia nu are sens');
end.
