Составьте алгоритм нахождения значения выражения y=x^2+4 на школьном алгоритмическом языке. заранее

Var x,y:real;beginwrite('Введиете X: ');readln(x);y:=power(x,2)+4;  //можно y:=x*x+4writeln('Y = ',y);end.