結果
問題 |
No.56 消費税
|
ユーザー |
![]() |
提出日時 | 2022-10-30 16:33:04 |
言語 | Scheme (Gauche-0.9.15) |
結果 |
WA
|
実行時間 | - |
コード長 | 177 bytes |
コンパイル時間 | 94 ms |
コンパイル使用メモリ | 5,504 KB |
実行使用メモリ | 16,256 KB |
最終ジャッジ日時 | 2024-07-07 07:54:14 |
合計ジャッジ時間 | 2,147 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge4 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | WA * 4 |
other | AC * 3 WA * 20 |
ソースコード
#!/usr/bin/env gosh (define (main _) (let* ([d (read)][p (read)]) (display (regexp-replace #/\..*$/ (format "~f" (* d (+ p 1))) ""))) (newline) 0)