Если паскаль:
var y,x:integer;
begin
writeln (введи х);
readln (x);
y:=12*sqr(x)+7*x-16;
writeln (y=,y);
readln;
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.