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