Moin, moin.

Ich habe hier zwei Polynome die aus einer Textdatei mit leerzeichengetrennten Koeffizienten ausgelesen werden.
Nun möchte ich die beiden Koeffizientenlisten addieren bzw. multiplizieren, damit ich eine neue Liste bekomme.

Das Berechnen der Polynome klappt super. Auch wenn ich einfach die Ergebnisse der einzelnen Berechnungen verwurste.
Aber ich kriege es nicht hin zwei Koeffizienten-Listen zu einer zusammen zu fassen.

Kann mir da jemand unter die Arme greifen?

Bsp:

markieren

Code:

(x^3+6x^2+x-5) * (2x^2+x+4) = 2x^5 + 13x^4 + 12x^3 + 15x^2 - x - 20

-5 1 6 1 (Polynom 1)
 4 1 2 (Polynom 2)
=
-20 -1 15 12 13 2 (Beide Polynome multipliziert)

Einfach ausmultiplizieren?
Wenn du die Polynome in 2 Arrays hast:
Polynom1:
a[0]=1
a[1]=6
a[2]=1
a[3]=-5

und zwei:
b[0]=2
b[1]=1
b[2]=4

Und Ergebnis c[]
==>

markieren

Delphi-Quellcode:

for i := 0 to 3 do
  for j := 0 to 2 do
    c[i+j] := c[i+j] + a[i] * b[j];

Die Grenzen festzulegen überlasse ich jetzt mal dir

So einfach hätte ich mir das jetzt nicht vorgestellt

Und wie ist es mitm Addieren? Hast du da auch so eine geile Patenlösung?

Addieren ist ja mal noch einfacher - du musst die Koeffizienten an den jeweiligen Stellen addieren.
Also c[i] = a[i] + b[i];
Natürlich vorher die Grenzen ermitteln

Zitat von jfheins:

Addieren ist ja mal noch einfacher

Hm. Stimmt. Das ist ZU einfach.

Jetzt muss ich das ganze mit meiner dynamischen Liste hinbekommen...