问题
-
阅读以下 FORTRAN 程序:READ(* , *)XIF(X , LE , 0)RHENY=0.0ELSEIF(X , LT , 5 , 0) , AND , (X
-
阅读以下FORTRAN程序 READ(*,*)M,NK=MOD(M,N)M=NN=KK=MOD(M,N)GOTO 10END IFWRITE(*,*)NEND若运
-
阅读FORTRAN77程序:READ(*,100)A,B,C,DWRITE(*,*)D100FORMAT(F2.1,3(1X,F3.1))END运行上述程序时
-
阅读FORTRAN77程序:READ(*,100)X100 FORMAT(3F3.1)WRITE(*,*)XEND运行上述程序时,如果从键盘输入
-
阅读以下FORTRAN 程序:READ( * *) MIF (M. LT. 100. AND. M
-
阅读FORTRAN程序:READ(* *)NDO 10 K-1 NS=S+K**210 CONTI