#316096 (Scheme) No.56 消費税 - yukicoder

提出ソース

結果

問題	No.56 消費税
ユーザー	nohopen
提出日時	2019-02-11 16:04:38
言語	Scheme (Gauche-0.9.15)
結果	AC
実行時間	23 ms / 5,000 ms
コード長	144 bytes
コンパイル時間	48 ms
コンパイル使用メモリ	6,688 KB
実行使用メモリ	16,128 KB
最終ジャッジ日時	2024-07-18 12:07:32
合計ジャッジ時間	1,920 ms
ジャッジサーバーID （参考情報）	judge1 / judge2

このコードへのチャレンジ
（要ログイン）

ファイルパターン	結果
sample	AC * 4
other	AC * 23

権限があれば一括ダウンロードができます

ソースコード

raw source code

(define (amount D P)
  (floor (* D (+ 1 (/ P 100)))))

(define (main args)
  (let* ((D (read))
         (P (read)))
    (print (amount D P))) 0)

0