问题
-
阅读以下 FORTRAN 程序:READ(* , *)XIF(X , LE , 0)RHENY=0.0ELSEIF(X , LT , 5 , 0) , AND , (X
-
阅读下列FORTRAN77程序: READ(* , *)X IF(X.LE.0) THEN Y=0.0 ELSE IF ((X.LT.5.0).AND.(X.N
-
阅读下列FORTRAN77程序段:S=0.0DO10J=0,NS=S+XX=X+0.510CONTINUE下面程序段中与上述程序段等价的
-
阅读FORTRAN77程序:READ(*,100)A,B,C,DWRITE(*,*)D100FORMAT(F2.1,3(1X,F3.1))END运行上述程序时
-
阅读下列FORTRAN77程序:INTEGERA(3,2)READ(*,100)A100FORMAT(2I3)WRITE*,*)AEND运行后要使A(1,2)
-
阅读以下FORTRAN 程序:READ( * *) MIF (M. LT. 100. AND. M