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