有一过程如下:Sub Sub1(m As Integer,total As Long)Dim i As Integertotal=1For i=1 To mtotal=total*iNextEnd Sub调用它的事件过程如下:Private Sub Command1_Click()Dim tot As Long,a As Integera=Val(InputBox("请输入数据"))Call Sub1(a,tot)Print totEnd Sub则输入数据5,运行结果为【 】。

题目

有一过程如下:

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.E.堆排序：procedure sift(i,m:integer);{调整以i为根的子树成为堆,m为结点总数}var k:integer;

2.86、在平时成绩记录器中，下列代码运行后，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 WendA．学生人数B．作业次数C．至少交过一次作业的学生人数D．以上都不对

3.下面哪个语句不能完成1到10的累加功能, total初值为0。A．for i in range(10,0):total+=iB．for i in range(1,11):total+=iC．for i in range(10,0,-1):total+=iD．for i in (10,9,8,7,6,5,4,3,2,1):total+=i

4.以下代码的运行结果为：public class Calc {public static void main (String args []) {int total = 0;for (int i = 0, j = 10; total >30; ++i, --j) {System.out.println(" i = " + i + " : j = " + j);total += (i + j);}System.out.println("Total " + total);}}A. 产生运行错误B. 产生编译错误C. 输出 "Total 0"D. 产生如下输出:i = 0 : j = 10i = 1 : j = 9i = 2 : j = 8Total 30

更多“有一过程如下: Sub Sub1(m As Integer,total As Long) Dim i As Integer total=1 For i=1 To m t ”相关问题

  • 第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; }


    A

  • 第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．以上都不对


    C

  • 第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; }


    A

  • 第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


    A 函数的功能是对数组某一区域内的元素隔个求和；a[3]=4,所以从4开始进行隔个求和，a[7]=8,即对4到8的元素隔个求和，4+6=10。

  • 第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


    C通过地址来引用二维数组，若有以下定

相关内容