Составьте программу на Pascal ABC y=x2(квадрат) +3

program p1;varx, y: integer;begin  Write('Введите x: ');  readln(x);  y:=sqr(x)+3;  writeln('y=' + y);end.