问题
-
阅读下列FORTRAN77程序:F=1.0D020K=3,7,320WRTTE(*,(I3,F8.1)K,K*KEND程序运行结果的最后一行是(
-
阅读下列FORTRAN77程序:DIMENSIONM(3,4)DATAM/4*2,4*1,4*-1/N=0D010K=1,410N=N十M(1,K)WRITE(*,*
-
阅读下列FORTRAN77程序:DIMENSIONP(3,3)D010K=1,3D010J=1,310P(K,J)=(K-1)*3+JCALLSUB(P(2,1),3,
-
阅读下列FORTRAN77程序:DIMENSIONA(3,3)D0100K=1,3D0100J=1,3100A(K,J)=K+JS=P(A,2,8)WRITE(*,*)
-
阅读下列FORTRAN77程序:DIMENSIONA(4,3)COMMON/P/AP=0.0D010K=1,3D010J=1,31F(P.LE.5.0)P=P+A(J,
-
阅读FORTRAN程序:READ(* *)NDO 10 K-1 NS=S+K**210 CONTI