disp(' Prüfung SS 2000 Aufgabe 5 ');
% 26.06.2001
%
Z=4.^2;
N=[1,0,-8,0,16];
%n1=[1,0,-4]       (x.^2-4).^2
%n=conv(n1,n1);    so rechnet er N selber aus, conv(a,b)->PolynomMultiplikation
%
[Res,Nu1,q]=residue(Z,N);
Res
Nu1
q
disp('f(x) = -0.5/(x-2) + 1/(x-2) + 0.5/(x+2) + 1/(x+2)')