fib.while
changeset 76 373cf55a3ca5
parent 75 898c25a4e399
child 80 191daa3ee29e
equal deleted inserted replaced
75:898c25a4e399 76:373cf55a3ca5
     5   input: n
     5   input: n
     6   output: fib_res
     6   output: fib_res
     7 
     7 
     8 */
     8 */
     9 
     9 
    10 n := 9;
    10 n := 90;
    11 minus1 := 0;
    11 minus1 := 0;
    12 minus2 := 1;
    12 minus2 := 1;
    13 temp := 0;
    13 temp := 0;
    14 while n > 0 do  {
    14 while n > 0 do  {
    15        temp := minus2;
    15        temp := minus2;
    16        minus2 := minus1 + minus2;
    16        minus2 := minus1 + minus2;
    17        minus1 := temp;
    17        minus1 := temp;
    18        n := n - 1
    18        n := n - 1
    19 };
    19 };
    20 fib_res := minus2;
    20 fib_res := minus2;
    21 print fib_res 
    21 write fib_res 
    22 
    22