Ответ:
Var
x, y: real;
begin
writeln('Введите x');
readln (x);
y:=Abs(x+5)/sqrt(x);
writeln ('y=',y);
readln;
end.
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Var
x, y: real;
begin
writeln('Введите x');
readln (x);
y:=Abs(x+5)/sqrt(x);
writeln ('y=',y);
readln;
end.