質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

ただいまの
回答率

90.86%

  • Java

    12481questions

    Javaは、1995年にサン・マイクロシステムズが開発したプログラミング言語です。表記法はC言語に似ていますが、既存のプログラミング言語の短所を踏まえていちから設計されており、最初からオブジェクト指向性を備えてデザインされています。セキュリティ面が強力であることや、ネットワーク環境での利用に向いていることが特徴です。Javaで作られたソフトウェアは基本的にいかなるプラットフォームでも作動します。

  • FORTRAN

    46questions

    FORTRAN(フォートラン)は科学時術計算に向いた手続き型プログラミング言語です。 並列計算の最適化が行いやすい特性上、数値予報および気候モデルなどの大規模な計算を行う分野のスーパーコンピュータで使われています。

fortran77からjavaに変換を試みたい

受付中

回答 1

投稿 編集

  • 評価
  • クリップ 0
  • VIEW 443

tomat

score 2

write文のファイルへの書き込み定義
write文、read文、CHARACTER文、open文等の書き換えがわからないです。

質問の修正を行ないました。


      SUBROUTINE INPUT(NEX,NIN,IBEX,IBIN,IBNO,NOB,NIB,PX,PY,
     &                 KBD,KTJ)
      IMPLICIT REAL*8(A-H,O-Z)
      DIMENSION IBEX(KBD),IBIN(KBD),IBNO(KBD,KTJ),PX(KTJ+3)
      DIMENSION PY(KTJ+3)
      CHARACTER FNAME*10
C
      WRITE(*,600)
  600 FORMAT(' INPUT FILE NAME = ? ')
      READ(*,500)FNAME
  500 FORMAT(A10)
      OPEN(8,FILE=FNAME)
    READ(8,510)NEX,NIN
    IF(NEX.NE.0)THEN
      READ(8,510)(IBEX(I),I=1,NEX)
    END IF
    IF(NIN.NE.0)THEN
      READ(8,510)(IBIN(I),I=1,NIN)
    ELSE
      READ(8,510)IBIN(1)
    END IF
    DO 10 I=1,NEX
      READ(8,510)(IBNO(I,J),J=1,IBEX(I))
   10   CONTINUE
    READ(8,510)NOB,NIB
    READ(8,520)(PX(I),PY(I),I=1,NOB+NIB)
  510   FORMAT(10I5)
  520   FORMAT(2E15.7)
      CLOSE(8)
      RETURN
      END
import java.io.*;
public class INPUT {

    /**
     * @param args
     */
    public static void INPUT(int NEX,int NIN
    ,int[] IBEX,int []IBIN,int [][]IBNO,int NOB,int NIB,double[] PX,double []PY,int KBD,int KTJ) {

        try{
            PrintStream out=new PrintStream(new FileOutputStream("output.txt"),true);


            .writer();
            System.out.println(FNAME);
            .close();
        }
        catch(Exception e){
            System.out.println("Exception:"+e);
        e.printStackTrace();
        }
    }
}

  • 気になる質問をクリップする

    クリップした質問は、後からいつでもマイページで確認できます。

    またクリップした質問に回答があった際、通知やメールを受け取ることができます。

    クリップを取り消します

  • 良い質問の評価を上げる

    以下のような質問は評価を上げましょう

    • 質問内容が明確
    • 自分も答えを知りたい
    • 質問者以外のユーザにも役立つ

    評価が高い質問は、TOPページの「注目」タブのフィードに表示されやすくなります。

    質問の評価を上げたことを取り消します

  • 評価を下げられる数の上限に達しました

    評価を下げることができません

    • 1日5回まで評価を下げられます
    • 1日に1ユーザに対して2回まで評価を下げられます

    質問の評価を下げる

    teratailでは下記のような質問を「具体的に困っていることがない質問」、「サイトポリシーに違反する質問」と定義し、推奨していません。

    • プログラミングに関係のない質問
    • やってほしいことだけを記載した丸投げの質問
    • 問題・課題が含まれていない質問
    • 意図的に内容が抹消された質問
    • 広告と受け取られるような投稿

    評価が下がると、TOPページの「アクティブ」「注目」タブのフィードに表示されにくくなります。

    質問の評価を下げたことを取り消します

    この機能は開放されていません

    評価を下げる条件を満たしてません

    評価を下げる理由を選択してください

    詳細な説明はこちら

    上記に当てはまらず、質問内容が明確になっていない質問には「情報の追加・修正依頼」機能からコメントをしてください。

    質問の評価を下げる機能の利用条件

    この機能を利用するためには、以下の事項を行う必要があります。

質問への追記・修正、ベストアンサー選択の依頼

  • 退会済みユーザー

    2017/01/04 18:15

    こちらの質問が他のユーザから「問題・課題が含まれていない質問」という指摘を受けました
    teratailでは、漠然とした興味から票を募るような質問や、意見の主張をすることを目的とした投稿は推奨していません。
    「編集」ボタンから編集を行い、質問の意図や解決したい課題を明確に記述していただくと回答が得られやすくなります。

  • seastar3

    2017/01/04 21:17

    510 のFORMATが明確でないとNEX と NINの取得分割ができません。また配列IBEXの取得のためのREAD文のFORMATも共通の510番でいいのでしょうか。

    キャンセル

  • tomat

    2017/01/09 14:23

    返信遅れてすいません。そうです。

    キャンセル

回答 1

0

FileWriter fw=new FileWriter(String[] args)
fw.write("  ")まではわかります

やりたいことに対して知識が不足しすぎていると思います。もう少し入出力に用いるJavaの代表的なクラス群を学んだほうがよいと思います。

テキスト出力はFileWriterではなくPrintStreamを使うことをお勧めします。その方が書式指定のテキスト出力ができますので。

入力についてはFortranの文化とJavaの文化に違いがあるような気がしますがとりあえずjava.util.Scannerクラスのリファレンスを参考にするとよいと思います。空白文字などで区切られた数値や文字列を読み込むことができます。

投稿

  • 回答の評価を上げる

    以下のような回答は評価を上げましょう

    • 正しい回答
    • わかりやすい回答
    • ためになる回答

    評価が高い回答ほどページの上位に表示されます。

  • 回答の評価を下げる

    下記のような回答は推奨されていません。

    • 間違っている回答
    • 質問の回答になっていない投稿
    • スパムや攻撃的な表現を用いた投稿

    評価を下げる際はその理由を明確に伝え、適切な回答に修正してもらいましょう。

  • 2017/01/09 14:24

    KSwordOfHasteさんありがとうございます。
    PrintStreamを見てみます。

    キャンセル

15分調べてもわからないことは、teratailで質問しよう!

  • ただいまの回答率 90.86%
  • 質問をまとめることで、思考を整理して素早く解決
  • テンプレート機能で、簡単に質問をまとめられる

関連した質問

  • 受付中

    [java][日付チェック]質問

    java初心者です。 テキストファイルを一行づつ読み込んで行く時に、 32日や14月など、異常な日付が紛れていた場合例外として処理する方法はありますでしょうか? while ((

  • 受付中

    private static final フィールドの値を変更してテストしたい

    例えば、実行時にstatic finalフィールドの値が決まるようなWordクラスがあったとします。 WordTestでは2つのインスタンスを生成しますが、w2の生成時には既に初

  • 解決済

    System.out.printからSystem.out.writeへの書き換え

    単純な足し算プログラムの書き換えができません。 System.out.printではなく、System.out.writeを使用するプログラムに書き換えたいのですが、 うま

  • 受付中

    フォルダの中にあるファイルを1つずつ読み込む

    最近Javaで開発を始めました。 複数のファイルが入っているフォルダがあります。 このフォルダから1ファイルずつ開き中身をバッファか配列に読み込むコードを書きたいです。

  • 解決済

    会員情報システム(Java)での作り方

    javaで会員情報システムのようなものを作りたいです。 下記の実行結果(コマンドプロンプトで実行)になるような、登録プログラムを作成したいのですが、作成方法が分かりませんので、教

  • 解決済

    javaについて

    javaについて質問です。情報処理検定第53回のプログラミング部門1級のjavaの問題をやっているんですけど、そのjavaに平均値を追加したいです。どのように追加すれば良いのでしょ

  • 解決済

    Javaでそれぞれの英単語のTFIDFの求め方がわかりません。

    Javaを独学で勉強中のJava初心者です。Javaで英文テキストファイルを読み込みそれぞれの英単語のTFIDFを表示させるプログラムを作りたいのですが、どうしてもうまくできません

  • 解決済

    改行区切りでの出力

    ランダムな整数を改行区切りで3個出力したくて以下のコードを打ってみたんですが間違いといわれました。どこが違うのか指摘お願いします  public class Main {  p

同じタグがついた質問を見る

  • Java

    12481questions

    Javaは、1995年にサン・マイクロシステムズが開発したプログラミング言語です。表記法はC言語に似ていますが、既存のプログラミング言語の短所を踏まえていちから設計されており、最初からオブジェクト指向性を備えてデザインされています。セキュリティ面が強力であることや、ネットワーク環境での利用に向いていることが特徴です。Javaで作られたソフトウェアは基本的にいかなるプラットフォームでも作動します。

  • FORTRAN

    46questions

    FORTRAN(フォートラン)は科学時術計算に向いた手続き型プログラミング言語です。 並列計算の最適化が行いやすい特性上、数値予報および気候モデルなどの大規模な計算を行う分野のスーパーコンピュータで使われています。