Ким
4 год назад
Пожалуйста посчитайте пожалуйста написать программу. Даю 100 поинтов!!
ОТВЕТЫ
Vadim
Oct 24, 2020
- var x, y: real;
- begin
- read(x);
- if x<=3 then y := x*x + 3*x + 9
- else y := sin(x)/(x*x -9);
- write(y);
- end.
- begin
- var f: real->real := x -> x<=3 ? x*x + 3*x + 9 : Sin(x)/(x*x - 9);
- f(ReadReal).Print(x)
- end.
302
Смежные вопросы:
