柠檬试题库
search
首页 计算机 公务员 驾照 关于

某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:Private Sub Command1_Click() Dim a(10)As Integer, max As Integer For k=1 To 10 a(k)=InputBox("输入一个整数") Next k max=0 For k=1 To 10 If a(k)>max Then max=a(k) End If Next k Print maxEnd Sub运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。下面的修改中可以得到正确运行结果的是( )。


  • A.把If a(k)>max Then改为If a(k)<max Then
  • B.把max=a(k)改为a(k)=max
  • C.把第2个循环语句For k=1 To 10改为For k=2 To 10
  • D.把max=0改为max=a(10)
热度🔥193
计算机二级office题库App
收录最新试题,随时随地刷题
参考答案:D
解析:打开微信小程序查看本题解析