---

入出力部の追加

　以下の入出力プログラムを使って下さい。

＊行列A、Bの要素、A(I,K)、B(K,J)への入力（AはM行L列、BはL行N列）

        DO 10 I=1,M
          READ(*,'( 10F9.3 )') (A(I,K),K=1,L)
   10   CONTINUE
      READ(*,*) DUMMY
        DO 20 K=1,L
          READ(*,'( 10F9.3 )') (B(K,J),J=1,N)
   20   CONTINUE

　ファイルに以下のように入力するデータを作って下さい（例は３行３列の行列、10列の行列まで可）。

     1.000     2.000     3.000
     4.000     5.000     6.000   ＜＝　行列A
     7.000     8.000     9.000
0                                ＜＝　DUMMY
     1.000     4.000     7.000
     2.000     5.000     8.000   ＜＝　行列B
     3.000     6.000     9.000

＊行列Cの出力（CはM行N列、10列の行列まで可）

        DO 10 I=1,M
          WRITE(*,'( 10F9.3 )') (C(I,J),J=1,N)
   10   CONTINUE

＜戻る＞