问题
-
阅读下列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此程序执行后的结果为:()