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

Program n1; var n,x: real; begin readln(x); if x>10 then n:=x-5 else n:=x*x*x+3*3; writeln(n); end.

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.