Question

составить программу на Паскаль. Помогите мне пожалуйста!!!

Answer 1

var y,x:real;
begin
Write('x='); Readln(x);
y:=sqr(x)+4;
Writeln('y=',y);
end.