11 кл Паскаль информатика Написать программу, которая вычисляет значение функции y = + x2

Предыдущий
вопрос Следующий
вопрос

program CalculateFunction;
var x, y: real;
begin
write('Enter the value of x: ');
readln(x);

y := x * x;

writeln('The value of the function y = x^2 is: ', y);
end.