［紧急求助］求VB程序运行结果和解析,dim x as integer ,dim i as integer ,x =100 ,fori =1 to 100 st...

Question

［紧急求助］求VB程序运行结果和解析,dim x as integer ,dim i as integer ,x =100 ,fori =1 to 100 step 5 ,x =x -i/6 ,next i ,print x

Answer 1

Dim x As Integer '定义变量x
Dim i As Integer '定义循环变量i
x = 100 '变量x赋值为100
For i = 1 To 100 Step 5 '循环变量i从1到100，每循环一次加步长5
x = x - i / 6
Next i
Print x '输出变量x的值

Answer 2

累加算法
x = 100 '变量x赋值为100
For i = 1 To 100 Step 5 '循环变量i从1到100，每循环一次加步长5
x = x - i / 6
Next i
Print x '输出变量x的值
结果：-61

Answer 3

'循环 1到100 ,"i"每次+5 ,就是循环20次
For i = 1 To 100 Step 5
x = x - i / 6 '98.34444 = 100- 1/6 , 后来i 越来越大,而X又越来越少
运行程序是可以中断后按F8一段一段代码的查看变量