Question

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

Answer 1

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