sugerencia recursividad????????

[kamsky]

Hola necesito implementar un TAD Polinomio , con una estructura LIFO (pila)

su declaracion es esta:

TYPE
Tpolinomio = ^polinom;

polinom = RECORD

grado:integer;
coeficiente:real;
sig:Tpolinomio;


end;


y hay varias operaciones , consigo hacer todas menos la d multiplicar:


procedure multiplicar(p1,p2:Tpolinomio; var p3:Tpolinomio);


rogaría que me dieran alguna idea, el procedimiento tiene que ser si se puede recursico, muchas gracias.