Тема: Линейные вычислительные алгоритмы. Задание: Напишите алгоритм вычисления у по формуле у=(1-x^2+5x^4)^2 где х-заданное

Для решения задания составим программу в Паскале:program n_1；const x＝5；var y: integer;beginy:＝sgr(1-sgr(x）+5*x*x*x*x）;writeln (\'y＝\', y);end.