运行下面程序,其运行结果K的值为?,其最里层循环体执行次数为?Dim i,j,k As Integeri=1 DoFor j=1To i step 2k=k+jNext i=i+2Loop Until i >8具体计算原理和步骤,具体解题方法.

运行下面程序,其运行结果K的值为?,其最里层循环体执行次数为?Dim i,j,k As Integeri=1 DoFor j=1To i step 2k=k+jNext i=i+2Loop Until i >8具体计算原理和步骤,具体解题方法.
运行下面程序,其运行结果K的值为?,其最里层循环体执行次数为?
Dim i,j,k As Integer
i=1 Do
For j=1To i step 2
k=k+j
Next i=i+2
Loop Until i >8
具体计算原理和步骤,具体解题方法.

运行下面程序,其运行结果K的值为?,其最里层循环体执行次数为?Dim i,j,k As Integeri=1 DoFor j=1To i step 2k=k+jNext i=i+2Loop Until i >8具体计算原理和步骤,具体解题方法.
句
DO
J=J+3
Loop While J<19
翻译过来就是：当J<19时 就一直执行J=J+3．
首先初始化J=10,j+3=13,13+3＝16,16+3＝19 然后跳出来
这其实是个送分题,是一个循环算法的入门
2.ECA 重点当然是
For i = 1 To Len(str1) Step 2
str2 = UCase(Mid(str1,i,1)) + str2
翻译一下：
Len(str1)的意思是字符串的长度,长度当然为6
从 1 到 6 每循环一次就加 2
那么它的循环顺序是 1,3,5
UCase(Mid(str1,i,1)) + str2
UCase：把字符转为大写
Mid,就是接取的意思,比如
Mid("abcdef",1,1))=a
Mid("abcdef",2,1))=b
明白了吗?
那么它的运行是这样的．
E ,EC,ECA
3.总共循环了10次,结果为31
重点
Do
For j = 1 To i Step 2
k = k + j
Next
i = i + 2
Loop Until i > 8
翻译：j从1一直循环到i 每一次循环都加2
一直运行到8停止
所有I的循环顺序是 1,3,5,7
而最终K的循环顺序是
2
3
6
7
10
15
16
19
24
31
如果你想从头学起可以买本VB语法入门,很容易的,关键是逻辑．有什么不懂的可以问我,留下你QQ就是