Напишите программу,которая вычисляет значение одной из следующей функции (через if)
Program ciri; var x,y:real; begin readln(x); writeln('x=',x); if x>=3 then y:=x else y:=x*x; writeln('y=',y); end.