Помогите! Надо решить ур-е способом Горнера (схемой Горнера) P=3x^9-2x^7+3x^6+4В паскале.

Помогите! Надобно решить ур-е способом Горнера (схемой Горнера)
P=3x^9-2x^7+3x^6+4
В паскале.

Задать свой вопрос
Аделя
А вот -5х в 3й степени -3х в 3й ступени, это будет -8х в третьей степени или же Вы написали сюда уравнение с опечаткой и не удосужились проверить, до этого чем надавить кнопку "выслать"? Объяснитесь!
Константин Сочинин
Извините не то, написано(вы правы этот вариант с опечаткой) Сейчас редактону
Тимур Никитошин
Зрение нехорошее, посещает лажаю (очень нередко)
Кирилл Перзашкевич
спасибо
1 ответ
PascalABC.NET 3.2, сборка 1488 от 21.06.2017
Внимание! Если программка не работает, обновите версию!

function Horner(x:real;a:array of real):real;
begin
  Result:=x*a.Last;
  for var i:=a.Length-2 downto 1 do
    Result:=x*(a[i]+Result);
  Result+=a.First
end;

begin
  var n:=ReadInteger('Ступень полинома:');
  var x:=ReadReal('x=');
  var a:=ReadArrReal('Коэффициенты, начиная со свободного члена:',n+1);
  Writeln('Значение полинома: ',Horner(x,a))
end.

Пример
Ступень полинома: 9
x= -4.2
Коэффициенты, начиная со свободного члена: 4 0 0 0 0 0 3 -2 0 3
Значение полинома: -1157435.18966682
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт