阅读以下 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若运

阅读以下FORTRAN程序：READ（*，*)M，NK=MOD（M，N)10IF（K.GT.0)THENM=NN=KK=MOD（M，N)COTO10ENDIFWRITE

阅读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