写出下列程序运行的结果. Dim s, i As Integer s=0 i=1 While i＜=10 s=s+1 i=i+1 Wend Print s

相关推荐

• 以下Visual Basic程序的功能是：计算表达式1+2+4+8+16+32+…+1024的值,并在文本框Text1中输出结果.为了实现这一功能,程序中划线处的表达式应更正为_____________.Private Sub Command1_Click()Dim i As Integer,s As Longs = 0i = 1Do While i
• 对任意正整数n,设计一个程序框图求s=1+1/2+1/3+...+1/n的值,并写出程序.已经知道一种DO LOOP UNTIL模式了INPUTS=1I=1DOS=S+1/(I+1)LOOP UNTIL I+1=N 现在求WHILE WEND模式
• 1.设有 float x=16.8,y=18.6; 则(int) (x+y)的结果为.A) 34 B) 35 C) 36 D) 372.以下选项中不是C语句的是 .A) { i=10； printf(“%d\n”,i); } B) max=m>n?m :n；C) a=8,c=18 D) ；3.设有：int a[10],i=5;以下对数组元素的引用,不正常的是____.A) a[9] B) a[0] C) a[i] D) a[i+5]4下列程序的功能是根据如下公式求s的值,直到最后一项的值小于10-5为止.s=1+1/3 +1/5 +1/7+…+1/ (2m+1)请改正程序中的错误,使它能得出正确的结果.#include void main( ){int n=0;double t,s; /* error 1*/do{n=n+1;t=1/ (2n+1); /* error 2*/s=s+t;}while(t0)fun(k-1);printf(“ %d”,k);1b 2c 3d4 /*error1*/
• 运行下列程序后M的值是多少?SET TALK OFF M=0 N=0 DO WHILE N>M M=M+N N=N-10 ENDDO M RETURN1输入货物重量，计算该货物的托运费，记费标准每千克0.1元，每当超过50千克以后，超出数再每千克加收0.2元，按要求编写一个收费程序。2,下列程序执行后，显示的结果是什么S=0 I=1 DO WHILE IY T=X X=Y Y=T ENDIF MOD SET TALK ON SET TALK OFF S=0 FOR I=1 TO10 S=S+I ENDFOR S SET TALK ON RETURN CJ=XJ+成绩 SKIP 运行此程序，屏幕上将显示什么
• for i=0 to 10 stup 3 s=s+1 next i print s 的结果是什么,..for i=0 to 10 stup 3s=s+1next iprint s的结果是什么,并解释i到9的时候是往下走呢,还是跳出循环
• 下列Visual Basic程序段运行后,变量s的值为__. a=2:b=1:s=0 For i=10 To 6 Step-1 s=s+a c=a+b a=b Next i
• s=0 For i=1 to 10 step 2 s=s+i Next Print s1、该程序的功能是?（4分）2、程序运行后,s和i的值分别为多少?（6分）3、该循环的循环次数是?退出循环的条件是?
• 下列Visual Basic程序段运行后,变量s的值为__. a=2:b=1:s=0 For i=10 To 6 Step-1s=s+ac=a+ba=bNext i
• for i=0 to 10 stup 3 s=s+1 next i print s 的结果是什么,..
• VB执行下列程序：S=5 For I = 2.6 to 4.9 step 0.6 S = S + 1 Next i Print S 求程序运行后的结果!
• 某算法的伪代码如下：S←0i←1While i≤100S←S+1/i(i+2)i←i+2End WhilePrint S则输出的结果是 _ ．
• 小明向老师借出了一个铅球,测出它的质量为4kg和500m3.请你用两种方法来帮助他判断铅球是否有纯铅制成的