单击窗体,输出斐波那契数列1,1,2,3,5,8,13-第20个数的值

publicclassFibonacci{\x05publicstaticintabc(intnumber){\x05\x05\x05if(numbe

PrivateSubCommand1_click()DimnAsIntegern=100Printf(n)EndSubFunctionf(n)Fori=1Tonf=f+1/iNextiEndFunct

#includevoidmain(){longa[42],i=2;a[0]=1;a[1]=1;for(;i

publicclassFibonacci{publicstaticvoidmain(Stringargs[]){inti=1,j=1;for(intn=1;n

using System;using System.Collections.Generic;using System.Linq;using System.Tex

#includevoidmain(){longf1=1,f2=1,i;for(i=0;i

#includeintmain(){\x09intn,i=1;\x09doublea=1,b=1;\x09scanf("%d",&n);\x09if(n==1)\x09\x09printf("1");

相对于其他人的代码,我的代码绝对是执行速度最快的,没有之一.#includeinta[13];intmain(){\x09a[0]=a[1]=1;\x09for(inti=2;i

这样写已经可以实现了,可以编译后执行一下就知道了,不过格式不太规范啊

'单击窗体函数里面的代码：DimiAsInteger'从1~200DimcountAsInteger'保存所求的和Fori=1to200If(iMod5=0)And(iMod7=0)Thencount

#includevoidfib(intn,intf0,intf1){intf;//当前项inti=0;if(n=2)printf("%8d,%8d",f0,f1);//f0,f1for(i=2;i

因为f[100]是一个很大的数字,int根本就表示不下来,应该用大数的加法来做的#include#includevoidsum(chara[],charb[]){\x09inti,n,k;\x09fo

矩阵乘法+快速求幂可以解决楼主的问题.详细的代码已经发给你了,去看看吧.

（1）求前100项和设置sum=0;数组第一项第二项fib[0]=fib[1]=1;设置变量初始值i=3;while(i

VB内置的常用函数里就有这个功能mid函数:比如你在text1中输入的三位数是123a=text1.texttext2.text=mid(a,1,2)这时输出的字符是1和2,含义是从第一个字符开始的前

DimaAsIntegera=InputBox("输入一个数")IfaMod2=0ThenMsgBox("偶数")ElseMsgBox("奇数")EndIf

PrivateSubForm_Click()s=0Fori=1To100s=s+iNextiPrint"1+2+...+100=";sEndSu

fibArray[100];fstreamout("fibArray.txt");for(i=2;i

#include"stdio.h"intmain(){inti,n;inta=1,b=1,sum=0;scanf("%d",&n);if(n==0)printf("N=%d",sum);

用什么语言呢?C还是PASCAL、VB?再问：vc++再答：#include<stdio.h>main(){ longa[30],i; a[0]=1;a[1]=1;&n