下列程序段的输出结果为（）。 Dim A（5) For i=1 to 5 A（i)=i*i Next i Print A（i)

相似题目

• 下列程序段运行后输出的结果是（）。 Private Sub Form_Click Dim X#, Y# X = 5: Y = 6 Print X + Y = 11 End Sub

  A . X+Y=11 B . 5+6=11 C . 11 D . True

  查看最佳答案

• 以下程序的输出结果是 _____ 。Dim aa=Array（1，2，3，4，5，6，7）For i=Lbound（a） To Ubound（a）a（i）=a（i）* a（i）Next iPrint a（i）

  查看最佳答案

• 有如下程序： Const n = -5 Const m = 6 Dim a(n To m) As Integer For i = LBound(a, 1) To UBound(a, 1) a(i) = i Next i Print a(LBound(a, 1)); a(UBound(a, 1)) 运行后输出的结果为（ ）。

  查看最佳答案

• 下列程序段的运行结果为（ ）。 Dim a Dim s%, i% a = Array(1, 2, 3, 4, 5) For i = 1 To 3 s = s + a(i) ^ 2 Next i Print s

  查看最佳答案

• 设 a 、 b 、 c 均为整型，下列程序段的输出结果为（ ）。 a=5 b=3 c=a-b Form1.print a & “-“& b & “=” &c

  查看最佳答案

• 如果变量a、b、c均为整型，下列程序段的输出结果为（ ）。a=2b=3c=a*bPrint a & \*\ & b & \=\ & c

  查看最佳答案

• 下列程序的执行结果是 _ ________ __ Dim a(5) As String Dim b As Integer Dim I As Integer For I = 0 To 5 a(I) = I + 1 Print a(I); Next I

  查看最佳答案

• 下列程序段的运行结果是（ ）。Dim A As Integer , B As IntegerA = 15B = 4Print 4 + A B

  查看最佳答案

• 下列程序:Option Base 1Private Sub Form_Click()Dim a(5，5)For i ＝ 1 To 5For j ＝ 1 To 5k ＝ k ＋ 1a (i，j)＝ kNext jNext iFor i ＝ 1 To 5s ＝ s ＋ a (i，i)Next iPrint sEnd Sub运行时的输出结果是( )。

  查看最佳答案

• 下列程序段的输出结果是 。 a=10: b=10000: x=log(b)/log(a): Print \lg(10000)=

  查看最佳答案

• 下列程序段的执行结果为 ______。 Dim A(10)，B(5) For i=1 To 10 A(i)=i Next i For j=1 To 5 B(j)=j*20 Next j A(5)=B(2) Print"A(5)="；A(5)

  A．A(5)=5 B．A(5)=10 C．A(5)=20 D．A(5)=40

  查看最佳答案

• 下列程序段的输出结果为()。 include＜stdio.h＞ main() { static char a[]="language"； char*p； p=a； for(p=a;p＜a+8;p+=2) putchar(*p)； }

  A．language B．lnug C．有语法错误 D．lang

  查看最佳答案

• 下列程序段的执行结果为______。Dim M（10), N（10)I=3For T = 1 To 5M（T) = TN（I) = 2 * I + TNext

  下列程序段的执行结果为______。 Dim M(10), N(10) I=3 For T = 1 To 5 M(T) = T N(I) = 2 * I + T Next T Print N(I)； M(I) A． 3 11 B．3 15 C．11 3 D．15 3

  查看最佳答案

• 下列程序段的输出结果为()。int x=3,y=2;printf("%d",(x-=y,x*=y+8/5));

  A．1 B．7 C．3 D．5

  查看最佳答案

• 下列程序段的执行结果为______。Dim A（3，3)For M=1 To 3For N=1 To 3If N=M 0r N=3-M+1 Then A（M，

  下列程序段的执行结果为______。 Dim A(3，3) For M=1 To 3 For N=1 To 3 If N=M 0r N=3-M+1 Then A(M，N)=1 Else A(M，N)=0 End If Next N Next M For M=1 To 3 For N=1 To 3 Print A(M， N)； Next N Print Next M A．1 0 0 0 1 a 0 0 1 B．1 1 1 1 1 1 1 1 1 C．0 0 0 0 0 0 0 0 0 D．1 0 1 0 1 0 1 0 1

  查看最佳答案

• 下列程序段的执行结果为（)。Dim A（3，3)For M=1 To 3For N=1 To 3If N=M Or N=3-M+1 Then A（M, N)=

  下列程序段的执行结果为()。 Dim A(3，3) For M=1 To 3 For N=1 To 3 If N=M Or N=3-M+1 Then A(M, N)=1 Else A(M，N)=0 End If Next N Next M For M=1 To 3 For N=1 To 3 Print A(M，N) Next N Print Next M A．1 0 0 0 1 0 0 0 1 B．1 1 1 1 1 1 1 1 1 C．0 0 0 0 0 0 0 0 0 D．1 0 1 0 1 0 1 0 1

  查看最佳答案

• 下列程序段的执行结果为______ 。Dim A（4)N= 3A（1) =1For K=0 To N-1For L=1 To K+1 X=K+2 -L A（X

  下列程序段的执行结果为______ 。 Dim A(4) N= 3 A(1) =1 For K=0 To N-1 For L=1 To K+1 X=K+2 -L A(X)=A(X)+A(X-1) If K＜N-1 Then Exit For Print A(X)； Next L Next K A． 1 2 1 B．1 2 3 C．2 4 6 D．1 3 1

  查看最佳答案

• 以下程序的输出结果是（)。main{ int a[3][3]=“l，2)，{3，4)，{5，6)}，i，j，s=0；for（i=1；i＜3；i++)fo

  以下程序的输出结果是()。 main { int a[3][3]=“l，2)，{3，4)，{5，6)}，i，j，s=0； for(i=1；i＜3；i++) for(j=0；j＜=i；j++)s+=a[i][j]； printf(”％d＼n”，s)； } A.18 B.19 C.20 D.21

  查看最佳答案

• 下列程序段的输出结果为__ int x=3,y=2; printf（“%d”,（x-=y,x*=y&43;8/5））（）

  A．1 B．7 C．3 D．5

  查看最佳答案

• 下列程序段的输出结果是__int a,b,m;for（a=5;a＞=1;a–）{ m=0; for（b=a;b＜=5;b++） m=m+a*b;}printf（“%d”,m）（）

  A．30 B．15 C．20 D．10

  查看最佳答案

• 下列程序段的输出结果为（）。 int x=1,a=0,b=0; switch（x) {case 0:b++; case 1:a++; case 2:a++;b++;} printf（“a=%d,b=%dn”,a,b);

  A．a=2,b=1 B．a=1,b=1 C．a=1,b=0 D．a=2,b=2

  查看最佳答案

• 下面程序段的执行结果是（）。 Dim A（5) As Interger For i=1 To 5 A（i)=i*i Next i Print A（i-1)

  A．5 B．25 C．0 D．16

  查看最佳答案

• 下列程序段运行结束后，消息框中的输出结果是_______。 Dim C As Boolean A=Sqr（3) B=Sqr（2) C=a＞b MsgBox C

  A．-1 B．0 C．False D．True

  查看最佳答案

• 下列段的执行结果为（）Dim A（）For I=2 To 4 For J=4 To 5 A（）=I*J Next J Next I Print A（）+A（）+A（）

  A．22 B．42 C．32 D．52

  查看最佳答案