требовалось написать программу которая решает уравнение а|x|=b относительно х для любых чисел а и b, введенных с клавиатуры

Question

Информатика

Зенон

4 февраля, 04:19

требовалось написать программу которая решает уравнение а|x|=b относительно х для любых чисел а и b, введенных с клавиатуры

+5

Ответы (1)

Знаете ответ на вопрос?

Минюша · Answer 1

Var a, b:integer; x:real;

begin

readln (a, b) ;

x:=abs (b/a) ;

writeln (x:0:2) ;

end.

АБС это модуль, но я могу и ошибаться, тогда

var a, b:integer; x:real;

begin

readln (a, b) ;

If a<0 then a:=a * (-1) ;

If b<0 then b:=b * (-1) ;

x:=abs (b/a) ;

writeln (x:0:2) ;

end.