結果
問題 |
No.63 ポッキーゲーム
|
ユーザー |
|
提出日時 | 2025-07-15 12:04:40 |
言語 | Standard ML (MLton 20210117) |
結果 |
MLE
|
実行時間 | - |
コード長 | 349 bytes |
コンパイル時間 | 3,451 ms |
コンパイル使用メモリ | 687,224 KB |
実行使用メモリ | 811,788 KB |
最終ジャッジ日時 | 2025-07-15 12:04:51 |
合計ジャッジ時間 | 5,826 ms |
ジャッジサーバーID (参考情報) |
judge5 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 11 MLE * 1 -- * 10 |
ソースコード
fun readInt () = valOf (TextIO.scanStream (Int.scan StringCvt.DEC) TextIO.stdIn) val () = let val l = readInt () val k = readInt () fun findAns remain = if remain <= 2 * k then 0 else k + findAns (remain - 2 * k) val ans = findAns l in print (Int.toString ans) end