当前位置: 答题翼 > 问答 > 建筑工程类考试 > 正文
目录: 标题| 题干| 答案| 搜索| 相关
问题

有程序:DIMENSIONA(2 2)INTEGERA YY=0DO20I=1 2D020J=1 2A(I J)=I*I+J*JY=Y+A(I J)20CONTINUEWRITE(* *)YEND此程序运行的结果为:()


有程序:DIMENSIONA(2,2)INTEGERA,YY=0DO20I=1,2D020J=1,2A(I,J)=I*I+J*JY=Y+A(I,J)20CONTINUEWRITE(*,*)YEND此程序运行的结果为:()

A、16

B、20

C、27

D、30

参考答案
您可能感兴趣的试题
  • 阅读下列FORTRAN77程序:DIMENSIONA(3,3)D0100K=1,3D0100J=1,3100A(K,J)=K+JS=P(A,2,8)WRITE(*,*)

  • 阅读下列FORTRAN77程序:INTEGERA(3,2)READ(*,100)A100FORMAT(2I3)WRITE*,*)AEND运行后要使A(1,2)

  • 微分方程yy’’-2(y’)2=0的通解是( )

  • 微分方程yy’’-2(y’)2=0的通解是( )

  • 微分方程yy-y2=0的通解为( )。A.B.C.D.

  • 有程序:DIMENSIONA(4 3)DATAA/3*-1.0 3*-2.0 3*-3.0 3*-4.0/S=0.0DO10K=1 4D=ABS(A(K 1))DO20J=2 3IF(ABS(A(K J)).GT.D)D=ABS(A(K J))20CONTINUES=S+D10CONTINUEWRITE(* *)SEND此程序执行后的结果为:()