Question

ПОМОГИТЕ ПРОШУ УМОЛЯЮ С ПАСКАЛЕМ!!

ИНФОРМАТИКИ ПОМОГИТЕ!!! Нужно составьте алгоритмы все эти по языку Лазаруса!!!
блок-схему не нужно, лишь нужно письменную часть

Answer 1

Ответ:

Var

x, y: real;

begin

writeln('Введите x');

readln (x);

y:=Abs(x+5)/sqrt(x);

writeln ('y=',y);

readln;

end.