Предмет: Информатика, автор: darasavrasova1

❤️❤️❤️100 БАЛЛОВ❤️❤️❤️
Нужно сделать всё по условиям указанных на картинке. ​

Приложения:

darasavrasova1: Гарантирую лучший ответ, лайк и 5 звёзд.
restIess: Могу попробовать, но хз запуститься ли это в лазарусе)
darasavrasova1: буду благодарна. очень благодарна
restIess: var
x,y: real;
begin
readln(x);
y:= (abs(x+5)) / sqrt(x);
writeln(y);
end.
darasavrasova1: благодарю!

Ответы

Автор ответа: 111thehackerman111
3

Ответ:

var

       x,y: real;

begin

       write('x = ');

       readln(x);        

       x := x + 5;

       x := abs(x);

       y := x / sqrt(x);

       writeln(y);

Объяснение:

-

Автор ответа: restIess
1

var

x,y: real;

begin

readln(x);

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

writeln(y);

end.

Похожие вопросы