FIBONACI.CPP
上传用户:wszmarenbt
上传日期:2013-04-26
资源大小:2552k
文件大小:1k
源码类别:

Windows编程

开发平台:

Visual C++

  1. //THE PROGRAM IS TO TEST THE FIBONACCI ORDER LIST.
  2. //FILE FIBONACI.CPP
  3. #define   CONST 46
  4. #include <stdio.h>
  5. #include <conio.h>
  6. long FIBONACI[CONST];
  7. long FIBFUNCTION(int NUMBER);
  8. int main()
  9. {
  10. int CIRCLE;
  11. window(1,1,80,25);
  12. clrscr();
  13. for (CIRCLE=0;CIRCLE<CONST;CIRCLE++)
  14. FIBONACI[CIRCLE]=FIBFUNCTION(CIRCLE);
  15. printf("nTHE NUMBER FIBFUNCTION(45) IS : %ldn",FIBFUNCTION(CONST-1));
  16. for (CIRCLE=0;CIRCLE<46;CIRCLE++)
  17. printf("%ld ",FIBONACI[CIRCLE]);
  18. //The above limit is "45" && The long integer must less than ten bits.
  19. //The Fibonacci Order List begins at "FIBFUNCTION(0)=1".
  20. getch();
  21. return 0;
  22. }
  23. long FIBFUNCTION(int NUMBER)
  24. {
  25. long FIB1=1,FIB2=1,FIB3;
  26. int CIRCLE;
  27. if (NUMBER<=1) return 1;
  28. for (FIB3=FIB1+FIB2,CIRCLE=2;CIRCLE<NUMBER;CIRCLE++)
  29. {
  30. FIB1=FIB2;
  31. FIB2=FIB3;
  32. FIB3=FIB1+FIB2;
  33. }
  34. return FIB3;
  35. }