2. Преобразуй алгоритм в программу на языке Pascal

program example;

var x, y: real;

begin

write('Введите x: ');

readln(x);

if x <= 5 then

y := x*x

else

y := sqrt(25*x);

writeln('y = ', y);

end.