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

2 задание паскалем писать

Приложения:

Ответы

Автор ответа: HRAshton
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.
Похожие вопросы
Предмет: Математика, автор: tureevadiana968
Предмет: Алгебра, автор: filalex