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

相关问题

• 1、阅读以下 FORTRAN 程序：READ（* *)XIF（X LE 0)RHENY=0.0ELSEIF（X LT 5 0) AND （X
  2018-09-25
• 2、阅读下列FORTRAN77程序： READ（* *)X IF（X.LE.0) THEN Y=0.0 ELSE IF （（X.LT.5.0).AND.（X.N
  2018-09-27
• 3、阅读以下FORTRAN程序 READ（* *)M NK=MOD（M N)M=NN=KK=MOD（M N)GOTO 10END IFWRITE（* *)NEND若运
  2018-09-28
• 4、阅读FORTRAN77程序：READ（* 100)A B C DWRITE（* *)D100FORMAT（F2．1 3（1X F3.1))END运行上述程序时
  2018-09-30
• 5、阅读下列FORTRAN77程序：DIMENSIONM（3 4)DATAM／4*2 4*1 4*－1／N＝0D010K＝1 410N＝N十M（1 K)WRITE（* *
  2018-09-30
• 6、阅读FORTRAN77程序：READ（* 100)X100 FORMAT（3F3.1)WRITE（* *)XEND运行上述程序时 如果从键盘输入
  2018-09-30