Question

Написать на языке паскаль программу вычисления у по формуле: y=(1-x^2 + 5x^4)^4 где х целое число

Answer 1

Program calc;
Var x,y: real;
Begin
Write('Первое число:');
readln (x);
y := (1-x*2+5*x*4)*2;
//  y := pow( (1-x*x+5*pow(x,4) ) ,2); или так если там степени
Write ('Результат:',y);
End.