ПОМОГИТЕ ПОЖАЛУЙСТА!!! Составить программы для вычисления переменной y по формуле y= 3x^2
Var y,x:real; Begin Write('x = ');ReadLn(x); y:=3*x*x; WriteLn('y = ',y); End.