Напишите программу для паскаль f=x^2*(x^2+1); x=6
var x, f:integer;
begin
x:= 6;
f:= sqr(x) * (sqr(x) + 1);
write('Ответ: ', f);
end.