阅读下列FORTRAN77程序：INTEGERA（3 2)READ（* 100)A100FORMAT（2I3)WRITE* *)AEND运行后要使A（1 2)

相关问题

• 1、阅读下列FORTRAN 77程序：INTEGERA（3 3)DO 10K＝1 3DO 10L＝1 310A（K L)＝K*10＋LWRITE（* '（1X 313)')
  2018-09-29
• 2、阅读下列FORTRAN77程序：INTEGERAA（2.3)DATAAA／1 2 3 4 5 6／CALLS2D19（AA)CALLS2D19（AA（1 2))ENDS
  2018-09-29
• 3、阅读下列FORTRAN77程序：EXTERNALPPINTEGER P PP Q（4 4)DATAQ／1 2 3 4 5 6 7 8 9 10 11 12 13 14
  2018-09-29
• 4、阅读下列FORTRAN77程序：DIMENSIONA（3 3)D0100K＝1 3D0100J＝1 3100A（K J)＝K＋JS＝P（A 2 8)WRITE（* *)
  2018-09-30
• 5、阅读下列FORTRAN77程序：DIMENSIONP（3 3)D010K＝1 3D010J＝1 310P（K J)＝（K－1)*3＋JCALLSUB（P（2 1) 3
  2018-09-30
• 6、阅读下列FORTRAN77程序：DIMENSIONM（3 4)DATAM／4*2 4*1 4*－1／N＝0D010K＝1 410N＝N十M（1 K)WRITE（* *
  2018-09-30