Ладыгин
4 год назад
задание 3 под вариантом 0подскажите как будет верно нужно для проверки
ОТВЕТЫ
Атанаска
Oct 24, 2020
- var x, y: real;
- begin
- read (x);
- if x >= -1 then y := sqrt(x + 4)
- else if x >= -4 then y := 3*x
- else y := 2*x + 5;
- write(y);
- end.
- begin
- var f: real->real := x -> x>=-1 ? sqrt(x+4) : x>=-4 ? 3*x : 2*x + 5;
- f(ReadReal).Print
- end.
425
Смежные вопросы:
