[单选题]

某人编写了下列程序,用来求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 max End 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)

参考答案与解析:

相关试题

下列过程的功能是:从键盘输入一个大于2的整数,输出小于该整数的最大质数。( )。

[单选题]下列过程的功能是:从键盘输入一个大于2的整数,输出小于该整数的最大质数。( )。例如,输入20,则输出l9,输入10,则输出7。为实现指定功能,程序()处应填写的语句是( )。A.k—k+1B.X=X一1C.X—X/kD.k—k一1

  • 查看答案
  • (程序说明) 计算下列算式的值。a,Ai为正整数,从键盘输入。其小∑Ai=1£«

    [单选题](程序说明) 计算下列算式的值。a,Ai为正整数,从键盘输入。其小∑Ai=1+2…+ Ai,Ai!=1 *2*3*Ai(i=1,2… a)。(程序)SET TAIK OFFC.LEARINPUT“M=”TO MSTORE 0 TO S1,S2F.OR I=1 TO M(8)D.O SUB1D.O SUB2E.NDFOR? ” 所求算式的值为:“+ALLTRIM(STR(S1/S2,15,3))SET TALK ONPROCEDURE SUB1(9)F.OR R=1 TO AK=K+RE.NDFO

  • 查看答案
  • 编写程序,将若干整数从键盘输入,以单链表形式存储起来,然后计算单链表中结点的个数

    [问答题] 编写程序,将若干整数从键盘输入,以单链表形式存储起来,然后计算单链表中结点的个数(其中指针P指向该链表的第一个结点)。

  • 查看答案
  • ( 6 ) 下面程序的功能是从键盘输入 1 大于 100 的整数 m ,计算并输

    [试题]( 6 ) 下面程序的功能是从键盘输入 1 大于 100 的整数 m ,计算并输出满足不等式1+22+32 +42 + …… .+n2<m的最大的 n 。请填空Private Sub Command1__Click ()D.im s ,m,n AS Integerm=Val ( InputBox ( “ 请输入一个大于 100 的整数 ” ))n=_________s=0D.o While s<mn=n+1s=s+n*nLoopPrint “ 满足不等式的最大 n 是_____E.nd

  • 查看答案
  • ( 9 ) 下面的程序执行时 , 可以从键盘输入一个正整数 , 然后把该数的每位

    [试题]( 9 ) 下面的程序执行时 , 可以从键盘输入一个正整数 , 然后把该数的每位数字按逆序输出 。 例如 : 输入 7685 ,则输出 5867 ,输入 1000 ,则输出 0001 。请填空。Private Sub Command1_Click()D.im x As Integerx=InputBox( “ 请输入一个正整数 ” )While x>_ _[11] ___Print x Mod 10;x=x/10WendPrint__ [12] __E.nd Sub

  • 查看答案
  • 从键盘输入一组无符号整数并保存在数组arr[N]中,以整数0结束输入,即第N£«

    [主观题]从键盘输入一组无符号整数并保存在数组arr[N]中,以整数0结束输入,即第N+1个数是0,要求这些数的最大位数不超过4位,其元素的个数通过变量num传人函数proc()。请补充函数proc(),其功能是:从数组arr中找出个位和十位的数字之和大于5的所有无符号整数,结果保存在数组yy中,其个数由函数proc返回。例如,当arr[8]={13,1,205,252,2,333,4444,21)时实际输人时,数与数之间用Enter键分开,bb[4]={252,333,4444)。注意:部分源程序给出如

  • 查看答案
  • 请补充main函数,该函数的功能是:从键盘输入3个整数,然后找出最大的数并输出。

    [主观题]请补充main函数,该函数的功能是:从键盘输入3个整数,然后找出最大的数并输出。例如,输入:12,45,43,最大值为45。注意:部分源程序给出如下。请勿改动主函数main和其他函数中的任何内容,仅在 main函数的横线上填入所编写的若干表达式或语句。试题程序:include<stdio.h>include<conio.h>main(){int a, b, c, max;clrscr();printf("/nlnput three numbers:/n");scanf("%d,%d,%d

  • 查看答案
  • 随机产生10个[30,100]内的整数,求最大值及所对应的下标

    [问答题] 随机产生10个[30,100]内的整数,求最大值及所对应的下标

  • 查看答案
  • 要求产生10个随机整数,存放在数组Arr中,从键盘输入要删除的数组元素的下标,将

    [单选题]要求产生10个随机整数,存放在数组Arr中,从键盘输入要删除的数组元素的下标,将该元素中的数据删除,后面元素中的数据依次前移,并显示删除后剩余的数据,现有如下程序:Option base 1Private Sub Command1_Click()D.im arr(10)as integerF.or i=1 to 10 ‘循环1A.rr(i)=int(rnd*100)Print arr(i);NextX=inputbox(“输入1-10的一个整数:”)F.or i=x+1 to 10 ‘循环2A.

  • 查看答案
  • 编写程序maxprog完成如下要求:从键盘输入15个数,然后找出其中的最大的数和

    [试题]编写程序maxprog完成如下要求:从键盘输入15个数,然后找出其中的最大的数和最小的数,将它们输出到屏幕上(其中最大数和最小数分别定义变量名为max和min)。

  • 查看答案