网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

下列程序段的执行结果为______。 Private Sub Command1_Click() n = 0 For a = 1 To 20 For b = 1 To 20 For c = 1 To 20 If a * a + b * b - c * c Then n=n+l End If Next c Next b Next a Print n End Sub

A.9

B.12

C.10

D.11


参考答案

更多 “ 下列程序段的执行结果为______。 Private Sub Command1_Click() n = 0 For a = 1 To 20 For b = 1 To 20 For c = 1 To 20 If a * a + b * b - c * c Then n=n+l End If Next c Next b Next a Print n End SubA.9B.12C.10D.11 ” 相关考题
考题 下列程序段的执行结果为______。 N=0 For I=1 To 3 For J=5 To 1 Step-1 N=N+1 NextJ NextI PrintN;J;IA.12 0 4B.15 0 4C.12 3 1D.15 3 1

考题 下列程序段的执行结果为______。 Dim n As Integer n=10 While n <> 0 n=n-1 Wend Print "n="; nA.n=0B.n=1C.FalseD.n=-1

考题 下列程序段的执行结果为 n=0 For i=1 To 3 For j=5 To 1 Step-1 n=n+1 Next j,i Print n;j;iA.12 0 4B.15 0 4C.12 3 1D.15 3 1

考题 下列程序段的执行结果为______ 。 N=0 J=1 Do Until N > 2 N=N+1 J=J+N* (N+ 1) Loop Print N; JA. 0 1B.3 7C.3 21D.3 13

考题 下列程序段的执行结果为( ), n=0 Fori=1 To 3 Forj=5 To 1Step-1 n=n+1 Nextj,i Printn;j;IA.12 0 4B.15 04C.12 3 1D.15 31

考题 下列程序段的执行结果为_______。 N=0 For I=1 To 3 For J=5 To 1 Step -1 N=N+1 Next J Next I Print N;J;IA.12 0 4B.15 0 4C.12 3 1D.15 3 1

考题 下列程序段的执行结果为______。N=0For I=1 To 3 For J=5 To 1 Step-1 N=N+1 Next JNext IPrint N;J;IA.12 0 4B.15 0 4C.12 3 1D.15 3 1

考题 下列程序段的执行结果为______。 N=0 For I=1 To 3 For J=5 To 1 Step-1 N=N+1 Next J Next I Print N; J; IA.12 O 4B.15 0 4C.12 3 1D.15 3 1

考题 下列程序段执行后输出结果为()。 int i=-1; if(i<=0) printf("****n"); else printf("%%%%n");A.****CB.%%%%C.%%%%CD.****

考题 执行下列的程序段后,结果为______。 i = 0 n = 0 Do While i < 32 i = (i + 1) * (i + 1) n = n + 1 Loop Print nA.29B.4C.3D.0