напишите программу для паскаль f=x^2*(x^2+1); x=6

var x, f:integer;

begin

x:= 6;

f:= sqr(x) * (sqr(x) + 1);

write('Ответ: ', f);

end.