Question

Y=(1-x^2+5x^4)^2 напишите программу на языке паскаль

Answer 1

Var x:real;
Begin
Write('x = ');ReadLn(x);
WriteLn('y = ',sqr(1-x*x-5*x*x*x*x));
End.

Answer 2

Вот пример программы на языке Pascal, которая вычисляет и выводит значение выражения Y=(1-x^2+5x^4)^2:

pascalCopy code
program ExpressionCalculation;
var
  x, Y: real;
begin
  // Ввод значения x
  write('Введите значение x: ');
  readln(x);
  
  // Вычисление значения выражения
  Y := sqr(1 - sqr(x) + 5 * power(x, 4));
  
  // Вывод результата
  writeln('Y = ', Y);
end.

Программа сначала запрашивает у пользователя значение переменной x, а затем вычисляет значение выражения Y=(1-x^2+5x^4)^2 и выводит его на экран.

Обратите внимание, что для работы с возведением в степень используется функция power(x, y), а для возведения в квадрат - функция sqr(x).