Составить программу вычисления значения функции y=x2
В pascal: read(y); write("y="x*2)
read(x); write("y="x*2)