作品 ID: 3450

一番効率的な払い方(札非対応)

公開

お釣りも含めて一番効率的なお金の払い方を考えるプログラムを作ったつもりです。十分な金銭はあるものとしています。

ソース

プログラム

「払う金額を入力」と尋ねる。
金額=それ
金額index=金額
最小枚数=0
最小コイン枚数は空配列
コイン枚数=[0,0,0,0,0,0]
コイン枚数@0=金額/500を切り捨て
コイン枚数@1=金額%500/100を切り捨て
コイン枚数@2=金額%500%100/50を切り捨て
コイン枚数@3=金額%500%100%50/10を切り捨て
コイン枚数@4=金額%500%100%50%10/5を切り捨て
コイン枚数@5=金額%500%100%50%10%5
枚数=コイン枚数の配列合計
最小枚数=枚数
最小コイン枚数=コイン枚数
払う金額=金額
「お待ちください」と表示
(金額index!=金額+501)の間
    0.001秒待つ
    コイン枚数=[0,0,0,0,0,0]
    コイン枚数@0=金額index/500を切り捨て
    コイン枚数@1=金額index%500/100を切り捨て
    コイン枚数@2=金額index%500%100/50を切り捨て
    コイン枚数@3=金額index%500%100%50/10を切り捨て
    コイン枚数@4=金額index%500%100%50%10/5を切り捨て
    コイン枚数@5=金額index%500%100%50%10%5
    釣り銭=金額index-金額
    コイン枚数@0=コイン枚数@0+釣り銭/500を切り捨て
    コイン枚数@1=コイン枚数@1+釣り銭%500/100を切り捨て
    コイン枚数@2=コイン枚数@2+釣り銭%500%100/50を切り捨て
    コイン枚数@3=コイン枚数@3+釣り銭%500%100%50/10を切り捨て
    コイン枚数@4=コイン枚数@4+釣り銭%500%100%50%10/5を切り捨て
    コイン枚数@5=コイン枚数@5+釣り銭%500%100%50%10%5
    枚数=コイン枚数の配列合計
    もし(枚数<最小枚数)ならば
        最小枚数=枚数
        最小コイン枚数=コイン枚数
        払う金額=金額index
    ここまで
    金額index=金額index+1
ここまで
「払う金額:{金額}円. 最適な金額:{払う金額}円  移動するコインの枚数(釣り銭含):{最小枚数}枚  500円/100円/50円/10円/5円/1円:{最小コイン枚数}(それぞれ枚)」と表示

作品について

作品情報

作品を編集

粉ぁぁ雪ぃぃ作

ライセンス: 未指定（未指定/貯蔵庫のみ）
形式: wnako
タグ: ツール, お金
利用バージョン: 3.7.22
アクセス数(累計): 58
アクセス数(今月): 58
更新日時: 2026/09/07 13:27 編集: 2026/09/07 15:25

作品公開情報

交流

コメントを取得中...