0

Fortran 愛好家の皆様、こんにちは。

3つの変数を次のように出力するファイルに書き込もうとしています

      program main

      integer N, u
      parameter(u=20)

      open (u, FILE='points.dat', STATUS='new')
      do 10 i= 1, 100 
          write(u,100) i, i*2, i*5
 10   continue 
 100  format (I5, I10, 9X, I10)
      close(u)

      print *,'COMPLETE!!'
      end

出力が得られます (points.dat が削除されたファイルの内容):

       1         2                  5
       2         4                 10
       3         6                 15
       4         8                 20
       5        10                 25
       6        12                 30
       7        14                 35
       8        16                 40
       9        18                 45
      10        20                 50
      11        22                 55
       12        24                 60
      ...
      ...
      ...
      ...
      ...
      99       198                495
     100       200                500
   |(This line added by the write statement)

しかし、私はこのようなものが欲しい:

1         2                  5
2         4                 10
3         6                 15
4         8                 20
5        10                 25
6        12                 30
7        14                 35
8        16                 40
9        18                 45
10       20                 50
11       22                 55
12       24                 60
  ...
  ...
  ...
  ...
  ...
  99       198                495
 100       200                500|(The cursor stop here)

つまり、各行の先頭にスペースはありません。「500」を印刷した後、最後の行が停止します

「1X」指定子を使用して水平間隔を使用しようとしましたが、成功しませんでした。

4

1 に答える 1