Программирование на языке паскаль. вычислить у=3х²+5, для х заданного с клавиатуры

program a1;
var x,y:integer;
begin
write ('x=');
read (x);
y:=3*sqr(x)+5;
writeln ('y(',x,')=',y)
end.