Question

Помогите

Написать программу вычисления значения кусочно-определённой функции при аргументе, введённом с клавиатуры

x2+10, если х>=5
Y(x)=
-x+5, если х<5

Answer 1

var

y,x: real;

begin

read(x);

if x>=5 then

y:=sqr(x)+10

else

y:=-x+5;

write(y)

end.