有如下程序: a=10 b=4 For j=1 to 20 Step –2 a=a+5 b=b+4 Next j Print a;b 程序运行后,输出的结果是
举一反三
- 运行如下程序后,输出结果为______。 a = 0 For j = 1 To 30 Step 2 a = a + j mod 5 Next j Print a
- 有如下程序: a=0 For j=1 To 20 Step 2 a=a+j\5 Next j Print a 运行后,输出的结果是______。 A: 12 B: 16 C: 40 D: 100
- 请阅读程序: Private Sub Form_Click() m=1 For i=4 To 1 Step-1 Print str(m); m=m+1 For j=1 To i Print "*"; Next j Print Next i End Sub 程序运行后,单击窗体,则输出结果是______。 A: 1**** 2*** 3** 4* B: 4**** 3*** 2* 1* C: **** *** **** * D: * ** *** ****
- 下列程序段的执行结果是______。 i=0 For j = 10 To 19 Step 3 i=i+1 Next j Print I A: 4 B: 5 C: 3 D: 6
- 在窗体上画一个名为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Command1_ Click() Dim arr(4, 4) For i = 1 To 4 For j = 1 To 4 arr(i, j) = (i - 1) * 3 + j Next j Next i For i = 1 To 2 For j = 1 To 2 Print arr(i, j) Next j Next i End Sub程序运行后,单击命令按钮,输出结果为______ 。 A: 3 4 6 7 B: 7 8 10 11 C: 1 2 4 5 D: 8 9 12 13