No.1ベストアンサー
- 回答日時:
program test
implicit none
integer::n
real*8,allocatable,dimension(:)::arr
!面倒なので直接ソース中に埋め込んでいるが,
!本来は別ファイルから読み込み,値の個数に応じて,
!allocateしなおすような仕組みを作るべき。
allocate(arr(5))
arr(1) = 57d0
arr(2) = 24d0
arr(3) = 38d0
arr(4) = 92d0
arr(5) = 37d0
!本当は引数渡しではなく,引数のみを関数に渡し,
!関数がuboundを行うべきだろうと思う。
n = ubound(arr,1)
print *,aver(arr,n)
contains
real*8 function aver(x,n)
real*8,dimension(:)::x
integer::n
integer::i
do i = 1,n
aver = aver + x(i)
end do
aver = aver / n
end function
end program
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- C言語・C++・C# このプログラミングの問題を教えてほしいです。 キーボードからデータ数nとn個のデータを入力し、平均値 3 2022/12/19 22:51
- C言語・C++・C# このプログラミング誰か教えてくれませんか 1 2022/06/02 15:27
- C言語・C++・C# [C言語] コメント文字列を無視して、数値データを読み込むプログラム部分について 5 2022/10/05 11:03
- Visual Basic(VBA) ファイル全てを .xlsm に変更したところ、プログラムが途中で落ちてしまっています 17 2022/12/07 12:03
- その他(プログラミング・Web制作) FORTRAN77の配列(除算) 2 2023/02/01 14:34
- Java javaでのプログラム(配列)について質問です. 2 2022/10/14 22:27
- 統計学 確率統計の問題です。 3 2022/04/07 04:39
- C言語・C++・C# 3つの倍精度浮動小数点値の平均を求めて、3つの引数全てを平均値に変更するメソッドを作成し、キーボード 1 2022/07/13 16:04
- 統計学 統計学の問題です よろしくお願いします 代表値 次の15件のデータについて,以下の問いに答えよ。 結 1 2023/01/31 18:53
- 統計学 統計学の問題です よろしくお願いします 代表値 次の15件のデータについて,以下の問いに答えよ。 結 5 2023/01/31 23:35
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
マッチング処理(1:N)
-
VB.NET で 二次元のハッシュは...
-
リストボックス複数選択抽出方法
-
PHPで変数名にハイフンを使うに...
-
foreachで上限回数指定方法また...
-
多次元配列の中で条件に合う要...
-
配列をループでたくさん宣言し...
-
読み(あ行~わ行)ごとに分け...
-
$_SESSIONに二次元配列を使える...
-
プルダウンメニューにDBの内容...
-
STLのvectorで作った配列をメン...
-
While文を使って配列の中身を全...
-
【PHP】配列内のある値以上をカ...
-
別ファイルの構造体の値を読み...
-
配列の要素(value)に、変数を...
-
◆速い、ファイル読み込みは?
-
漢字のソートについて
-
PHPのセレクトボックスの初期値...
-
CArrayのソート
-
PHPにてクラスを配列にすること...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
foreachで上限回数指定方法また...
-
VB.NET で 二次元のハッシュは...
-
PHP、{}記号の意味
-
マッチング処理(1:N)
-
sqlのデーターを『あ行』『か行...
-
3つの連想配列を交互に代入し...
-
smartyのforeachの使い方
-
Smartyでインクリメント
-
Excel VBAでフィルター後の対象...
-
連想配列でキーを利用して一部...
-
ラジオボタンをランダムに表示...
-
ftokが動かない?
-
配列からプルダウン用のHTMLを生成
-
リストボックス複数選択抽出方法
-
関数の引数に配列を初期化なしで。
-
foreachの間にテーブルの<TR>を...
-
smartyでtplファイルでの2次元配列
-
PHPで変数名にハイフンを使うに...
-
PHPでJSONを扱うときに配列の参...
-
PHPで連想配列のプルダウンメニ...
おすすめ情報