/* AGS 3.6 */ #include int erg,n; /* iterativer Alg. */ int fib(int z) { int i,p,q,r; if (z==0) return 0; if (z==1) return 1; p=0; q=1; for (i=1; i