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

Вопрос пользователя:

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

Илюха отвечает:

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.

Добавить свой ответ