Schemat Hornera Iteracyjnie i rekurencyjnie

Odpowiedz Nowy wątek
2015-11-08 18:05

Rejestracja: 4 lata temu

Ostatnio: 4 lata temu

0

Witam!

Przeszukałem chyba pół internetu w poszukiwaniu schematu hornera napisanego iteracyjnie i rekurencyjnie w Pascalu, a mimo to go nie odnalazłem.

Jedyne co znalazłem to coś takiego:

program schemathornera;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
  n, z, ai, i, y : integer;
  wspol : array[0..100] of integer;

begin
  writeln('podaj z');
  readln(z);
  writeln('podaj stopien n');
  readln(n);
  i := 0;
  while i <= n do
  begin
    writeln('podaj wartosc wspolczynnika ', i);
    readln(ai);
    wspol[i] := ai;
    i := i + 1;
  end;
  y := wspol[0];
  i := 1;
  while i <= n do
  begin
    ai := wspol[i];
    y := y * z + ai;
    i := i + 1;
  end;
  writeln('wartosc wielomianu wynosi: ', y);
  readln;
end.

Ale nie mam pojęcia jaką metodą jest to napisane. Jeżeli to możliwe prosiłbym o napisanie tego właśnie programu na dwa sposoby.

Z góry dziękuję

edytowany 1x, ostatnio: olesio, 2015-11-08 18:19
Nastepnym razem wstawiaj kod w konkretne znaczniki korozycujące. Tutaj kod wygląda na pisany pod Delphi, więc masz delphi albo code=pascal. I koniecznie formatuj kod. Nie umiesz tego robić sam, to zobacz przyklejony post z informacjami jak to robić. Inaczej kolejny tak nieczytelny wątek trafi do kosza za brak szacunku do czytelnika. - olesio 2015-11-08 18:21
"Jeżeli to możliwe prosiłbym o napisanie tego właśnie programu na dwa sposoby." - no tak, bo każdy ma czas żeby odwalać za kogoś robotę; Nie sądzę, żeby się ktokolwiek znalazł; - furious programming 2015-11-08 19:04
@furious programming to co 100zł i dział ogłoszenia? :) - woolfik 2015-11-09 08:37
Najpewniej tak, ale zobaczymy co pytacz odpisze ;P - furious programming 2015-11-09 14:44

Pozostało 580 znaków

2015-11-09 02:40
Moderator Delphi/Pascal

Rejestracja: 8 lat temu

Ostatnio: 9 godzin temu

Lokalizacja: Tuchów

0

Jedyne co znalazłem to coś takiego:
...
Ale nie mam pojęcia jaką metodą jest to napisane.

To jest sposób iteracyjny - do rekurencyjnego potrzebna jest procedura/funkcja, która będzie rekurencyjnie wywoływana.


edytowany 1x, ostatnio: furious programming, 2015-11-09 02:40

Pozostało 580 znaków

Odpowiedz

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0