题目内容

设有如下程序:Private Sub Command1_Click()Dim sum As Double, x As Doublesum = 0n = 0For i = 1 To 5x = n / in = n + 1sum = sum + xNext iEnd Sub该程序通过For循环计算一个表达式的值,这个表达式是（）。

A. 1+1/2+2/3+3/4+4/5
B. 1+1/2+2/3+3/4
C. 1/2+2/3+3/4+4/5
D. 1+1/2+1/3+1/4+1/5

查看答案

搜索结果不匹配？点我反馈

更多问题

为计算1+3+5+……+99的值,某人编程如下：k=1s=0do While k<=99k=k+2s=s+kloopPrint s在调试时发现运行结果有错误,需要修改.下列错误原因和修改方案中正确的是（）。

A. While …Wend循环语句错误,应改为For k=1 To 99 …Next k
B. 循环条件错误,应改为Whlie k<99
C. 循环前的赋值语句k=1错误,应改为k=0
D. 循环中两条赋值语句的顺序错误,应改为s=s+k : k=k+2

查看答案

下列各种形式的循环中,输出"*"的个数最少的循环是（）。

A. a=5 : b=8 Do Print "*" a=a+1 Loop While a
B. a=5 : b=8 Do Print "*" a=a+1 Loop Until a
C. a=5 : b=8 Do Until a-b Print "*" b=b+1 Loop
D. a=5 : b=8 Do Until a>b Print "*" a=a+1 Loop

查看答案

下面程序段输出的结果是（）。Private Sub Command1_Click()x = 8For i = 0 To 20 Step 5x = x + iNextPrint "X="; xEnd Sub

A. X=210
B. X=218
C. X=50
D. X=58

查看答案

下面程序在调试时出现了死循环Private Sub Command1_Click()n=InputBox("请输入一个整数")DoIf n Mod 2=0 Thenn=n+1Elsen=n+2end ifLoop Until n=1000End Sub下面关于死循环的叙述中正确的是（）。

A. 只有输入的n是偶数时才会出现死循环,否则不会
B. 只有输入的n是奇数时才会出现死循环,否则不会
C. 只有输入的n是大于1000的整数时才会出现死循环,否则不会
D. 输入任何整数都会出现死循环

查看答案

设有如下程序:Private Sub Command1_Click()Dim sum As Double, x As Doublesum = 0n = 0For i = 1 To 5x = n / in = n + 1sum = sum + xNext iEnd Sub该程序通过For循环计算一个表达式的值,这个表达式是（）。

A. 1+1/2+2/3+3/4+4/5 B. 1+1/2+2/3+3/4 C. 1/2+2/3+3/4+4/5 D. 1+1/2+1/3+1/4+1/5

为计算1+3+5+……+99的值,某人编程如下：k=1s=0do While k<=99k=k+2s=s+kloopPrint s在调试时发现运行结果有错误,需要修改.下列错误原因和修改方案中正确的是（）。

下列各种形式的循环中,输出"*"的个数最少的循环是（）。

下面程序段输出的结果是（）。Private Sub Command1_Click()x = 8For i = 0 To 20 Step 5x = x + iNextPrint "X="; xEnd Sub

下面程序在调试时出现了死循环Private Sub Command1_Click()n=InputBox("请输入一个整数")DoIf n Mod 2=0 Thenn=n+1Elsen=n+2end ifLoop Until n=1000End Sub下面关于死循环的叙述中正确的是（）。

A. 1+1/2+2/3+3/4+4/5
B. 1+1/2+2/3+3/4
C. 1/2+2/3+3/4+4/5
D. 1+1/2+1/3+1/4+1/5