[单选题]

有程序:INTEGERA(3)DATAA/3*1/N=2DO10I=1.NDO10J=1,N10A(I)=A(J)+1WRITE(*,*)A(N)END此程序的运行结果为:()

A . 1

B . 2

C . 3

D . 4

参考答案与解析:

相关试题

有程序:DIMENSIONA(2,2)INTEGERA,YY=0DO20I=1,

[单选题]有程序:DIMENSIONA(2,2)INTEGERA,YY=0DO20I=1,2D020J=1,2A(I,J)=I*I+J*JY=Y+A(I,J)20CONTINUEWRITE(*,*)YEND此程序运行的结果为:()A . 16B . 20C . 27D . 30

  • 查看答案
  • 下列程序执行后的输出结果为:K=1DO10I=1,2DO10I=1,210K=K

    [单选题]下列程序执行后的输出结果为:K=1DO10I=1,2DO10I=1,210K=K*I/JWRITE(*,*)KEND()A . 1B . 0C . 0.5D . 2

  • 查看答案
  • 有程序:K=1DO10I=1,2DO10J=1,210K=K*I/JWRITE(

    [单选题]有程序:K=1DO10I=1,2DO10J=1,210K=K*I/JWRITE(*,*)KEND此程序执行后的输出结果为()A . 1B . 0C . 0.5D . 2

  • 查看答案
  • 有以下程序:main(){int i=1,j=2,k=3;if(i£«£«==1

    [单选题]有以下程序: main() { int i=1,j=2,k=3; if(i++==1&&(++j==3||k++==3))printf("%d%d%d/n",i,j,k); } 程序运行后的输出结果是( )。A.1 2 3B.2 3 4C.2 2 3D.2 3 3

  • 查看答案
  • 下列程序段的执行结果为 m=2 n=3 Do m=m £« n n=n £« 1

    [单选题]下列程序段的执行结果为m=2n=3D.om=m + nn=n + 1Loop While m < 10Print m; nA.1 5B.14 6C.a bD.10 25

  • 查看答案
  • 有程序:K=0DO10I=1,2DO10J=1,210K=K+I/JWRITE(

    [单选题]有程序:K=0DO10I=1,2DO10J=1,210K=K+I/JWRITE(*,*)KEND此程序的执行结果K值为()A . 0B . 2C . 2.5D . 1

  • 查看答案
  • 下列程序段的执行结果为 m=2 n=3 Do m=m£«n n=n£«1 Loo

    [单选题]下列程序段的执行结果为m=2n=3D.om=m + nn=n + 1Loop While m < 10Print m; n( )。A.1 5B.14 6C.a bD.10 25

  • 查看答案
  • 假定有以下程序段n=0for i=1 to 3for j=£­3 to 1n=n

    [单选题]假定有以下程序段 n=0 for i=1 to 3 for j=-3 to 1 n=n+1 next j next i 运行完毕后,n的值是( )。A.3B.4C.12D.15

  • 查看答案
  • 有程序:DO10I=1,5,3DO10J=I,310K=I+JWRITE(*,*

    [单选题]有程序:DO10I=1,5,3DO10J=I,310K=I+JWRITE(*,*)KEND此程序的运行结果是:()A . 8B . 4C . 7D . 10

  • 查看答案
  • 下列程序段的执行结果为()。Dim m(10),n(10)I=3For I=1

    [单选题]下列程序段的执行结果为( )。 Dim m(10),n(10) I=3 For I=1 to 5 M(t)=t N(I)=2*I+t Next t Print n(I);m(I)A.3 11B.3 15C.11 3D.15 3

  • 查看答案
  • 有程序:INTEGERA(3)DATAA/3*1/N=2DO10I=1.NDO1