[单选题]

编写程序:

OptionBase1

D.immark()AsInteger

PrivateSubCommand1_Click()

D.imn,sumAsInteger

D.imaveAsSingle

n=Val(InputBox("输入学生的个数"))

ReDimmark(n)AsInteger

sum=0

F.orI=1Ton

mark(I)=10*I

sum=sum+mark(I)

NextI

ave=sum/n

Printsum;"和";ave

E.ndSub

单击命令按钮后输入4,则输出的结果为( )

A.60和20

B.30和20

C.11和10

D.100和25

参考答案与解析:

相关试题

阅读程序: OptionBase1Dimarr()AsIntegerPrivat

[单选题]阅读程序:Option Base 1D.im arr() As IntegerPrivate Sub Form_Click()D.im i As Integer, j As IntegerReDim arr(3, 2)F.or i = 1 To 3F.or j = 1 To 2arr(i, j) = i * 2 + jNext jNext iReDim Preserve arr(3, 4)F.or j = 3 To 4arr(3, j) = j + 9Next jPrint arr(3, 2)

  • 查看答案
  • 软件就是程序,编写软件就是编写程序。()

    [判断题] 软件就是程序,编写软件就是编写程序。()A . 正确B . 错误

  • 查看答案
  • 测题的编写程序包括()。

    [多选题]测题的编写程序包括()。A.搜集资料B.命题的一般原则C.测题的编制要领D.文字流畅

  • 查看答案
  • 测题的编写程序包括()。

    [多选题]测题的编写程序包括()。A.搜集资料B.命题的一般原则C.测题的编制要领D.文字流畅

  • 查看答案
  • 编写如下事件过程:OptionBase1PrivateSubFormClick(

    [单选题]编写如下事件过程: Option Base 1 Private Sub Form Click() Dim x1()As Integer Dim i As Integer Dim s As Integer ReDim x1(3) For i = 1 To UBound(x1) x1(i)=i + 1 Next i Call sub1(x1) For i = 1 To UBound(x1) s = s + x1(i) Next i Print s End Sub Private Sub sub1(n

  • 查看答案
  • 程序员编写程序时使用的地址是()。

    [单选题]程序员编写程序时使用的地址是()。A . 主存地址B . 逻辑地址C . 物理地址D . 有效地址

  • 查看答案
  • 从程序的行文角度,编写程序源代码应注意______。

    [单选题]从程序的行文角度,编写程序源代码应注意______。A.源程序文档化B.程序的语句结构C.数据的说明D.以上都是

  • 查看答案
  • 程序员编写程序的主要根据是什么?

    [问答题] 程序员编写程序的主要根据是什么?

  • 查看答案
  • 在编写程序文件时,()应重点阐述。

    [单选题]在编写程序文件时,()应重点阐述。A .适用范围B .术语C .职责D .程序内容

  • 查看答案
  • 编写程序时,应该力求做到以下几点:()

    [填空题] 编写程序时,应该力求做到以下几点:()

  • 查看答案
  • 编写程序:OptionBase1Dimmark()AsIntegerPrivat