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[]
==>
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