- 基础理论
- 数据及数据库技术
- 人工智能
- 算法理论
- 算法实例
- 面向对象程序设计 VB开发工具
- 算法实例的程序实现
- 算法及算法的表示方法
- 多媒体理论
- 基础软件操作
- 算法软件操作
- 多媒体软件操作
- 网络技术应用
输入20个数,按从大到小的顺序打印。
PRIVATE SUB FORM----CLICK( )
DIM I AS INTEGER ,A(20) AS SINGLE
Dim J AS INTEGER
FOR I= 1 TO 20
A(I)= VAL(INPUTBOX(“请输入数”))
NEXT I
FOR I= 1 TO 19
FOR J= _______________ TO 20
IF _____________________
_____________________
A(I)=A(J)
A(J)=T
END IF
NEXT J
PRINT A(I);
____________________________
PRINT A(I)
END SUB
PRIVATE SUB FORM----CLICK( )
DIM I AS INTEGER ,A(20) AS SINGLE
Dim J AS INTEGER
FOR I= 1 TO 20
A(I)= VAL(INPUTBOX(“请输入数”))
NEXT I
FOR I= 1 TO 19
FOR J= _______________ TO 20
IF _____________________
_____________________
A(I)=A(J)
A(J)=T
END IF
NEXT J
PRINT A(I);
____________________________
PRINT A(I)
END SUB
求2+4+6+8+10+12+14+……100。
PRIVATE SUB FORM-----CLICK( )
DIM I AS INTEGER,S AS INTEGER
FOR I= 2 TO 100 __________
S=S+___________
NEXT I
PRINT S
END SUB
PRIVATE SUB FORM-----CLICK( )
DIM I AS INTEGER,S AS INTEGER
FOR I= 2 TO 100 __________
S=S+___________
NEXT I
PRINT S
END SUB
数学表达式
对应的正确Visual Basic表达式为[ ]

A.-b+Sqr(b*b-4*a*c)/2*a |
B.-b+Sqr(b*b-4*a*c)/(2*a) |
C.(-b+Sqr(b*b-4*a*c))/(2*a) |
D.(-b+Sqr(b*b-4*a*c))/ 2*a |