フォートランの if文で
IF(M-1) 15,15,12
ってのがあるんですが,これはどういう意味を表しているのでしょうか ?
IF(R.LE.0.D0) THEN
・・・・
ならRが0より小さいときは・・・・しなさい.って命令ですよね.
でもうえのは,カッコの中がいったいどういうときならってのを表してるのかも分からないし,15,15,12 ってのも意味がわかりません.
基本的なことかもしれませんが,よろしくお願いします.
一応その部分のプログラムも載せておきます.
X(N+1)=X(1)
Y(N+1)=Y(1)
DO 10 I=1,N
XM(I)=(X(I)+X(I+1))/2
10 YM(I)=(Y(I)+Y(I+1))/2
IF(M-1)15,15,12
12 XM(NC(1))=(X(NC(1))+X(1))/2
YM(NC(1))=(Y(NC(1))+Y(1))/2
DO 13 K=2,M
XM(NC(K))=(X(NC(K))+X(NC(K-1)+1))/2
13 YM(NC(K))=(Y(NC(K))+Y(NC(K-1)+1))/2
15 CONTINUE
No.1ベストアンサー
- 回答日時:
FORTRANなんて学生だった頃にちょっとしただけなのであまり覚えていないし、質問のようなIF文はつかった覚えがないですが、IF
( A ) L1,L2,L3 は Aが負のときL1、0のときL2、正のときL3へジャンプしなさいということではないでしょうか?No.5
- 回答日時:
xの値がゼロになったら、ストップさせるプログラムを書くならIF (X.EQ.0) STOP
「.」をふくめて、「.EQ.」で比較演算子。
------
算術if文は一般的に以下のように使う。
if(算術式で書かれた条件)負の場合の文番号、零の場合の文番号、正の場合の文番号
IF(A)10,20,30は負のとき、0の時、正負のときの飛ぶ先の行文番号。
----
算術 if 文
Fortran 90 までは互換性のために存在するが, プログラムの論理構造がわかりにくいため, 利用は奨められない。 Fortran 95 では廃止された。
例 if (x) 10, 20, 30
---
IF(A)は論理変数Aが真か偽かきくもの。
Mが数値の時IF(M-1)は通常使わないのでは。
----
IF(R.LE.0.D0) THEN
LE.0.のあとはDOかD0か。
DOはDO...END DO,Do WHILE END DOがあるがここには来ない
と思う。不明。
回答ありがとうです。
じぶんでももっと勉強しないとだめですね。
また質問あるかもしれません。
その時はよろしくお願いします。
ありがとうございました。
No.4
- 回答日時:
こんばんは。
私も、高校の時に習いましたので、参考書を見てみました。
IF (e) s1,s2,s3
は、算術IF文と呼ばれるもので、カッコ内 e の結果が、
e<0 なら、s1 の文番号に
e=0 なら、s2 の文番号に
e>0 なら、s3 の文番号に、それぞれジャンプします。
ですから、15,15,12 は文番号です。
> K=2,2 になりますけど,この場合はM=2についてのみ
> 行われることになるんですか?
そうですね。
M=2 で、ループを1回だけ回ることになります。
回答ありがとうです。
皆さん高校で習っていらっしゃるんですね。
僕は大学3年からなんですが。
補足に対する回答も、ありがとうございました。
No.3
- 回答日時:
工業系の高校で習いました...10年以上前...懐かしいです。
#1が書かれたので正しいですが、参考のURLを載せます。
それと「LE」は「0」も含むので注意。
^^^
昔覚える時に「L⇔<」「G(下の部分)⇔>」と覚えました。
「E」はイコールですね...(^-^:...恥ずかしい。
参考URL:http://www.g.dendai.ac.jp/class/fortran/fort09.h …
この回答への補足
早速のお返事ありがとうございます.
すっごく助かりました.
ちなみに,乗せたプログラムでですが,
M=2の場合(M-1)は正になるので12へ飛びますよね.
すると
DO 13 K=2,M
では K=2,2 になりますけど,この場合はM=2についてのみ
行われることになるんですか?
No.2
- 回答日時:
FORTRANなんて学生だった頃にちょっとしただけなのであまり覚えていないし、質問のようなIF文はつかった覚えがないですが、IF
( A ) L1,L2,L3 は Aが負のときL1、0のときL2、正のときL3へジャンプしなさいということではないでしょうか?お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(プログラミング・Web制作) FANUC(Series 0)のNCプログラムにて、下記のようなWhile文のネスト構造にすることは 1 2023/07/20 20:41
- コーヒーメーカー・電気ケトル・電気ポット パナソニック コーヒーメーカー 2 2023/01/11 20:18
- 建設業・製造業 歯車の製造の仕事の難度 1 2022/07/25 19:04
- Excel(エクセル) Excelの計算式の意味が知りたい 3 2023/06/19 17:49
- 建設業・製造業 nc旋盤やレーザー加工機を使うには様々なプログラムを覚えなくてはいけないと思うのですが、やはり記憶力 3 2023/06/29 20:53
- Visual Basic(VBA) ファイル全てを .xlsm に変更したところ、プログラムが途中で落ちてしまっています 17 2022/12/07 12:03
- 建設業・製造業 nc旋盤やレザー加工機などを使用している製造の会社は見た目陰キャラくさいような人が多いイメージなんで 1 2023/07/06 23:44
- カスタマイズ(車) NCロードスターのオートマRHTについて。 中古で11万キロで納車したのですが、エンジンかけた時や吹 3 2023/05/13 18:05
- 経営情報システム 買取業務に興味があるんですか、以前静岡県にベトナム人の方たちが営業している、廃品置き場的な場所で、そ 1 2022/10/27 16:06
- ドライブ・ストレージ RS232C 通信でエラー(受信が正確でない)がでます。どなたか教えてくださいませ。 11 2022/09/03 11:53
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ウェブサイトのアクセスログに...
-
vba クリップボードクリアにつ...
-
Google ColaboでGUI作成
-
Googleタグマネージャで、既存H...
-
Python - Excel で Webからデー...
-
VBSでテキストファイルの2行目...
-
テキストファイルの1行目のみを...
-
VBAでパワーシェルを実行したい...
-
初心者powershellのPS1ファイル...
-
htaccessで特定のディレクトリ...
-
python コードについて(初学者...
-
PythonのTkinter詳しい方へ。画...
-
Pythonのスクレイピングの質問...
-
Version Control on Unity
-
Python... 環境設定 初心者です...
-
windowsでテキストファイルの各...
-
Webサイト内に埋め込んだmp4動...
-
chatGPTで次々と質問をしていく...
-
Pythonについて。
-
JRのjsonファイルって使って大...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VB.NETで階乗を求めるプログラ...
-
COBOLのIFの入れ子について
-
式?文?節?
-
javascript初心者です
-
COBOL計算
-
OpenCV cvmatchtemplate
-
GoTo文について
-
プログラミング言語ベーシック
-
苦しんで覚えるc言語について
-
VBとフィボナッチに明るい方、...
-
プログラミングの問題です。
-
perlで確率計算
-
FORTRAN77の質問です。
-
fortranのif文で・・・
-
二つの図形を画面上で同時に動...
-
小文字wと大文字Wの区別
-
システムエンジニアの適正について
-
web上のhtmlファイルから文字デ...
-
Ruby / passenger のインストー...
-
Ruby interpreter (CUI) 2.2.3 ...
おすすめ情報