分页:
上一页 1 2 3 4 5 6 7 [8] 9 下一页
’**********found**********
CALL sum1(j, s) ’参考答案:CALL sum1((j), s)
’**********found**********
total = s ’参考答案:total = total + s
NEXT
PRINT total
SUB sum1(k, s)
s = 0
DO
s = s + k: k = k - 1
’**********found**********
WHILE k > 0 ’参考答案:LOOP WHILE k > 0
END SUB
第13题
给定程序MODI1.BAS其功能是:为一个三行三列的二维数组A赋值并在屏幕上按方阵形式输出,请将程序调试出如下结果。
1 2 3
2 4 6
3 6 9
注意:不得增行或删行,也不得更改程序的结构!
OPTION BASE 1
DIM a(3,3)
’**********found**********
FOR k=0 TO 2 ’参考答案:FOR k=1 TO 3
’**********found**********
FOR j=0 TO 2 ’参考答案:FOR J=1 TO 3
’**********found**********
a(k,j)=k+j ’参考答案:a(k,j)=k*j
分页:
上一页 1 2 3 4 5 6 7 [8] 9 下一页