-
阅读下面程序: INTEGER Q(3,4) DATA Q/4* -1,4* -2,4* -3/S=0DO 10 K=1,310 S=S+Q(K,K+1)DO 20 K
-
阅读以下FORTRAN程序:READ(*,*)M,NK=MOD(M,N)10IF(K.GT.0)THENM=NN=KK=MOD(M,N)COTO10ENDIFWRITE
-
阅读下列FORTRAN77程序段:S=0.0DO10J=0,NS=S+XX=X+0.510CONTINUE下面程序段中与上述程序段等价的
-
阅读下列FORTRAN77程序:DIMENSIONP(3,3)D010K=1,3D010J=1,310P(K,J)=(K-1)*3+JCALLSUB(P(2,1),3,
-
阅读下列FORTRAN程序:S=1.0D010K=2,4,210S=S+1.0/KWRITE(*,*)SEND执行上述程序后,输出的S值为()。
-
阅读下列FORTRAN77程序:DIMENSIONA(4,3)COMMON/P/AP=0.0D010K=1,3D010J=1,31F(P.LE.5.0)P=P+A(J,
-
阅读下列FORTRAN 程序: DIMENSION M(6) READ(* *)M DO 10 J