Site hosted by Angelfire.com: Build your free website today!

全国高等学校计算机等级考试(江西考区)

二级QBASIC上机测试模拟试卷九

 

一、二、三题同一级的一、二、三题

四、下面程序存在二处错误,将错误语句进行更正,并在计算机上运行给出程序运行结果。

该程序是用于求任意两个数A,B的最大公约数和最小公倍数。

10      Input A,B

20      For I = A To A * B Step B

30      If I \ A = I / A Then M = I: GoTo 60

40      Next

50      D = A * B / M

60      Print A, B

70      Print M, D

80      End

五、程序填空

下列程序用于找出矩阵在该行中最小在该列中最大的元素,请将它补充完整,但不得修改其它语句。

10      Dim A(5, 6)

20      For I = 1 To 5

30      For J = 1 To 6

40      READ A(I, J)

50      Next J

60      Next I

70      For I = 1 To 5

80      M = A(I, 1)

90

100

110     For L = 1 To 5

120

130

140                  End

 

[返 回]