fortranの練習問題

fortran90/95 プログラミングの問題の回答例を知りたいです。
問題
10000,5000,1000円札,500,100,50,10,1円硬貨が十分にあるとする。
支払額を読み込み、その額を最も少ない数の通貨で支払うにはどうすればいいか。
例えば25483円を最も少ない通貨で支払う場合
10000円札2枚,5000円札1枚,100円硬貨4枚,50円硬貨1枚,10円硬貨3枚,1円硬貨3枚である。

if文,do文,配列を使うのかなって感じなのですが、よくわからないです。
よろしくお願いします。

No.2 ベストアンサー 回答者： qhtsige 回答日時： 2012/12/19 14:57

わかりやすいアルゴリズムは

１残り＝支払額
２．１００００万円札の枚数＝残り／１００００　（整数計算であること）
残り＝残り－　１００００円の枚数×１００００
（残りが１００００円未満であれば、枚数はゼロになることに注意）
３．５０００円札の枚数＝残り／５０００
残り＝残り－　５０００円の枚数×５０００

以下１０００円、５００円・・・と繰り返す。
コーディングはそれぞれの段階をIF文で並べることになる。　
この方法が枚数合計の最小になることをどのように証明するかが課題として残る。
数学的帰納法でやるのでしょうが。　　

No.1 回答者： Tacosan 回答日時： 2012/12/19 14:44

「Fortran が」わからないのですか? つまり, 「自分ではどう計算すればいいかわかる (し実際に計算できる) けど, それを Fortran で書くことができない」のですか?

しかし, 5円玉がかわいそうだ.