Написать программу, которая решает уравнение ax+b меньше 0 относительно x для любых чисел a и b , введёных с клавиатуры. Помогите пожалуйста)
Написать программу, которая решает уравнение ax+b <0 относительно x для любых чисел a и b , введёных с клавиатуры.
Помогите пожалуйста)
Гость
Ответ(ы) на вопрос:
Гостьax + b < 0
ax < -b
x < - b / a
a, b могут быть дробными числами.
Язык программирования: Паскаль
var
a, b : real;
begin
readln (a);
readln (b);
if a <> 0 then
writeln ('x < ', - b / a);
if (a = 0) and (b < 0) then
writeln ('x - любое число');
if (a = 0) and (b >= 0) then
writeln ('нет решений')
end.
Гостьvar a,b,x:real; begin write ('A = ');readln(a); write ('B = ');readln(b); if (a=0) and (b>=0) then writeln ('Нет решений') else if (a=0) and (b<0) then writeln ('X - любое число') else if a>0 then writeln ('X < ',-b/a:0:4) else if a<0 then write ('X > ',-b/a:0:4); readln; end.
Не нашли ответ?
Похожие вопросы