利用循环语句计算1 2 3 ~ 100的结果-搜答案-搜搜考试网

楼上这位仁兄算的是100以内的偶数之和吧.求奇数的话,要把IF作个修改,修改如下：SUM1=0FORi=1TO100IFMOD(i,2)0SUM1=SUM1+iendifENDFORsum1或者用循环

需要的控件：命令按钮,2个,command1,command2标签,2个,label1,label2command1代码：Private Sub Command1_Click()&

【答案】：12【运行过程】由于step(步长)为3,每次循环时,i都会+3.如果不写step3则默认每次循环+1循环ii与10比较s①3

Private Sub Command1_Click() Dim i As Integer &

说清楚你要具体做什么再问：对于下列数据进行分组，每组5个数，要求总长度为90，所分组中先将短的取完，其次较短的，以此类推，用lingo解决长度1415161718192021根数35292142356

在excel中用vba输入以下代码即可：（vb中也可以）Subaaa()Dims,i,k,mFori=1To1000IfiMod2=0Thenk=0-iElsek=iEndIfs=s+1/kNextM

intmain（void）｛inti,ans;For(i=1;i再答：��ټ�һ��#include再问：лл

DimiAsIntegerFori=0To100i=i+1NextResponse.Write(i)

////////////////////下面是whileintsum=0;int_i=0;while(_i

dimheaslong,naslonghe=0n=1dohe=he+nn=n+1loopuntilln>100msgbox"累加和是："&he‘以上是VB的写法.

Dfor(inti=0;i

publicclassSum{\x09publicstaticvoidmain(Stringargs[]){\x09\x09inti,j,sum=0;r=1;\x09\x09while(i

intsum=0;for(inti=0;i

int s=1; for(int i=2;i<70;i++){ s=s*i;//循环退出时S的值就是69的阶乘}

什么语言?如果是VB:DimsasIntegerDimiasIntegers=0Fori=0to100Step2'i从0数到100,每隔两个数字数一次,所以就是0,2,4,6,8,...,100s=s

intsum=0;//for循环for(inti=1;i

a=100,b=1+0.02while(i=1,i

你没注明要什么语言.再问：matlab再答：MATLABfor(i=1:123)j=i+j;endj==================================================

intnum=1;for(inti=1;i

对于循环：Forcounter=startToend[Stepincrement]statementsNext[counter]来说,该循环中语句statements执行的次数为：int((end-s