progs/fib.while
changeset 182 9ce2414e470e
parent 178 d36363d648e3
child 207 f824e1331fc6
equal deleted inserted replaced
181:1f98d215df71 182:9ce2414e470e
     1 /* Fibonnacci sequence implemented in 
     1 /* Fibonnacci numbers implemented in 
     2    the WHILE language */
     2    the WHILE language */
     3    
     3    
     4 write "Input a number ";
     4 write "Input a number ";
     5 read n;
     5 read n;
     6 x := 0;   // start values
     6 x := 0;   // start values