計算機言語:lecture3
差分
このページの2つのバージョン間の差分を表示します。
両方とも前のリビジョン前のリビジョン次のリビジョン | 前のリビジョン最新のリビジョン両方とも次のリビジョン | ||
計算機言語:lecture3 [2022/08/25 11:41] – [Pascal] kimi | 計算機言語:lecture3 [2022/08/25 11:43] – [FORTRAN] kimi | ||
---|---|---|---|
行 21: | 行 21: | ||
writeln(v, s); | writeln(v, s); | ||
end. | end. | ||
- | } | + | </ |
- | + | ==== FORTRAN ==== | |
+ | <code fortran> | ||
+ | PROGRAM CYLIND | ||
+ | PARAMETER (PI = 3.141592) | ||
+ | DOUBLE PRECISION R, H, S, V | ||
+ | READ (5, *) R, H | ||
+ | WRITE (6, *) R, H | ||
+ | V = PI*R*R*H | ||
+ | S = 2.0*PI*R*(R + H) | ||
+ | WRITE (6, *) V, S | ||
+ | STOP | ||
+ | END | ||
+ | </ | ||
==== c ==== | ==== c ==== | ||
<code c> | <code c> | ||
行 37: | 行 48: | ||
return 0; | return 0; | ||
} | } | ||
- | <.code> | + | </code> |
行 51: | 行 62: | ||
</ | </ | ||
<code fortran> | <code fortran> | ||
- | C program文の後、変数宣言文の前簡単な演算も可能 | + | C program文の後、変数宣言文の前簡単な演算も可能 |
PARAMETER(定数名 = 定数値) | PARAMETER(定数名 = 定数値) | ||
- | C 複数の定数を定義する場合 | + | C 複数の定数を定義する場合 |
PARAMETER(N = 10, M = 11) | PARAMETER(N = 10, M = 11) | ||
PARAMETER(N = 10, M = N + 1) | PARAMETER(N = 10, M = N + 1) |
計算機言語/lecture3.txt · 最終更新: 2022/08/25 11:45 by kimi