有一过程如下:
Sub Sub1(m As Integer,total As Long)
Dim i As Integer
total=1
For i=1 To m
total=total*i
Next
End Sub
调用它的事件过程如下:
Private Sub Command1_Click()
Dim tot As Long,a As Integer
a=Val(InputBox("请输入数据"))
Call Sub1(a,tot)
Print tot
End Sub
则输入数据5,运行结果为【 】。
第1题:
若要实现total=1+2+3+4+5求和,以下程序段错误的是()
A.int i=1,total=1; while(i<5) { total+=i; i+=1; }
B.int i=1,total=0; while(i<=5) { total+=i; i+=1; }
C.int i=0,total=0; while(i<5) { i+=1; total+=i; }
D.int i=0,total=0; while(i<=5) { total+=i; i+=1; }
第2题:
11、在平时成绩记录器中,下列代码运行后,Total的意义是 ToTal = 0:i = 5:flat = 1 While flat If Cells(i, 1) <> "" And Cells(i, 2) <> "" Then ToTal = ToTal + 1 i = i + 1 Else flat = 0 End If Wend
A.学生人数
B.作业次数
C.至少交过一次作业的学生人数
D.以上都不对
第3题:
在平时成绩记录器中,下列代码运行后,Total的意义是 ToTal = 0:i = 5:flat = 1 While flat If Cells(i, 1) <> "" And Cells(i, 2) <> "" Then ToTal = ToTal + 1 i = i + 1 Else flat = 0 End If Wend
A.学生人数
B.作业次数
C.至少交过一次作业的学生人数
D.以上都不对
第4题:
34、若要实现total=1+2+3+4+5求和,以下程序段错误的是()
A.int i=1,total=1; while(i<5) { total+=i; i+=1; }
B.int i=1,total=0; while(i<=5) { total+=i; i+=1; }
C.int i=0,total=0; while(i<5) { i+=1; total+=i; }
D.int i=0,total=0; while(i<=5) { total+=i; i+=1; }
第5题:
下列程序的输出结果是 int total = 0; for (int i = 0; i < 4; i++ ){ total += i; if (i == 2) break; } System.out.println(total);
A.1
B.3
C.5
D.6
第6题:
有如下程序段: int total = 0; for (int i = 0; i < 4; i++ ){ if (i == 1) continue; if (i == 2) break; total += i; } 则执行完该程序段后total的值为:()
A.0
B.1
C.3
D.6