Написать программу, которая решает уравнение ax + b меньше 0 относительно x для любых чисел a и b, введёных с клавиатуры.

ax + b < 0 ax < -b  x < - b / a Целые числа. Язык программирования: Паскаль var a, b : integer; begin  readln (a);  readln (b); if (a = 0) and (b < 0) then writeln ('x - любое число'); if (a = 0) and (b >= 0) then writeln ('нет решений'); if a <> 0 then writeln ('x < ', - b / a)  end.