Контрольная работа: Виконання символьних операцій з многочленами

n:=stepin(a);

riv (zero, b);

for i:=n downto 0 do

b [i+1]:=a[i]/(i+1);

end;

end.