Question

помогите по информатике, фото выложила ))

Answer 1

Var
X:real;
Begin
Write('X = ');ReadLn(X);
if X<= 10 then Write('N(',X,') = ',X*X*X+9)
else Write('N(',X,') = ',X-5);
End.