2017.11.14FORTRAN続きで、標準入力です。標準入力を使うには、READ(*,*)でよさそうです。標準入力した文字列を表示するプログラムを作ります。100文字ぐらい読めるようにCHARACTER*100で定義しておきます。takk@deb9:~$複数行読めるでしょうか。takk@deb9:~$良く分かってないですが、やはり先頭の一行しか無理そうです。複数行読むには、DOで回します。takk@deb9:~$出るには出たのですが、なぜ一つ飛びで表示されるのでしょう。して、*100となっているのが原因かも。端末の行数を超えてしまってるのかもしれません。wcコマンドで確認してみます。-L101takk@deb9:~$間違いないです。改行を含めて101文字表示されています。文字列変数(最初,最後)で部分文字列が抽出できるので、文字列の長さが分かればいけるでしょうか。LENを使ってみます。100takk@deb9:~$だめでした。空白も含んだ文字列の長さが出てしまうので100と表示されます。次は、INDEXで空白の出現位置を取得してみます。3takk@deb9:~$大丈夫そうです。INDEXで空白の出現位置を確認して、トリムしたいと思います。念のためカラム数を確認します。Fortran毎日学習FORTRAN(echoコマンドを作る)FORTRANです。echoコマンド作ります。いつものようにオプション無です。echoコマンドは、パラメータで渡した文字列を表示するコマンドなので、パラメータ数分の文字列表示を繰り返せばできあがります。Fortran毎日学習FORTRAN(自作splitのデバッグその5)FORTRANでデバッグ続きです。gdbを見てみるとこのような一文がありました。Fortranコンパイラが完成すればサポートされると書いてありますが、デバッグできててますね。Fortran毎日学習Fortran90(whereその2)whereを使って配列を初期化する方法を考えてみます。配列を同じ値で初期化する場合は、たとえば1なら、こんな風に書けると思います。Fortran毎日学習FORTRAN(自作splitのデバッグその6)前回はGDBデバッグで文字列を見やすくするため、デバッグ対象であるFORTRANプログラムを修正しました。ナンセンスなことですが、早く覚えるためできるだけたくさんFORTRANのプログラミングをしていこうと思ってます。Fortran毎日学習Fortran90(product)productを使って配列の積を求めます。全要素を掛けた結果、つまり総乗を求めたいので、このような計算となります。productを使えば一発です。Fortran毎日学習Fortran90(定数)ずっとFortranは定数が使えないと思ってましたが、ありました。parameterを使うようです。定数を使う前のプログラム。上のプログラムを定数を使った形に変えてみます。Fortran毎日学習スポンサーリンク広告プロフィール管理人:takketeお仕事:システムエンジニア日々何か向上したくて、もがいています。Policyホーム検索トップサイドバースポンサーリンク広告プロフィール管理人:takketeお仕事:システムエンジニア日々何か向上したくて、もがいています。thanksタイトルとURLをコピーしました。