Поделитесь своими знаниями, ответьте на вопрос:
Дано натуральное число х. вычислить y = 1 - 2x + 3x2(в квадрате) - 4x3(в третьей степени разрешается использовать не более 8 арифметических операций. допустимы: операции сложение, вычитание, умножение. протестировать программу для x=0, x=1, x=-2.
step: array[1..8] of real;
i, x: integer;
begin
readln(x);
step[1] := 1 - x;
step[2] := step[1] * step[1];
step[3] := step[2] * step[1];
step[4] := 3 * x;
step[5] := step[4] * x;
step[6] := 1 - step[5];
step[7] := step[6] * x;
step[8] := step[3] + step[7];
for i := 1 to 8 do
write(step[i], ' ');
end.