Program Equa_1d;
Var a, b : Real;
Begin
Writeln('a = ');
Readln(a);
Writeln('b = ');
Readln(b);
If a <> 0 Then Writeln ('x = ', -b/a)
Else If b = 0 Then Writeln ('IR')
Else Writeln ('{}') ;
End.