res:=RES(x,a,b)
[a, b jsou polynomy
použité algoritmy:
rem(a,b) - zbytek po dělení polynomu a polynomem b
deg(a) - stupeň polynomu a
lcof(a) - vedoucí koeficient polynomu a, tj. koeficient
u x^deg(a)]
1. n:=deg(a);
m:=deg(b);
2. if n > m then res:=(-1)^(nm) RES(x,b,a);
else lc:=lcof(a);
if n = 0 then res:=lc^m;
else r:=rem(b,a);
if r = 0 then res:=0;
else p:=deg(r);
res:=lc^(m-p) RES(x,a,r);
fi
fi
fi