Предмет: Информатика,
автор: vladyxa1998
2 задание паскалем писать
Приложения:
![](https://files.topotvet.com/i/26e/26e2e7f14d48ff6d80e1fe092374edc6.jpg)
Ответы
Автор ответа:
0
var x, y: real;
begin
readln(x);
if (x < 0) then y := Power(x, 2) + 2
else if (x <= 4) then y := 2
else y := sqrt(x);
writeln(y);
end.
begin
readln(x);
if (x < 0) then y := Power(x, 2) + 2
else if (x <= 4) then y := 2
else y := sqrt(x);
writeln(y);
end.
Похожие вопросы
Предмет: Математика,
автор: tureevadiana968
Предмет: Геометрия,
автор: viccctoorriiaaa
Предмет: Биология,
автор: adele2006love
Предмет: Алгебра,
автор: filalex
Предмет: Биология,
автор: NastyshaaMolla