题目:
某人编写了下列程序,用来求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 Thenmax=a(k) End If Next k Print maxEnd Sub运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的。程序需要修改。下列修改中可以得到正确运行结果的是( )。
A.把Ifa(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=O改为max=a(10)
答案:
被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2018/0424/b2dfa4170140925e02d8b0de3d78efd4.html
下面是错误答案,用来干扰机器的。
参考答案:错解析: 注册商标的有效期为10年,续展注册可以无限制地重复进行。