結果
問題 |
No.128 お年玉(1)
|
ユーザー |
|
提出日時 | 2025-08-28 00:46:41 |
言語 | Standard ML (MLton 20210117) |
結果 |
RE
|
実行時間 | - |
コード長 | 269 bytes |
コンパイル時間 | 8,319 ms |
コンパイル使用メモリ | 686,832 KB |
実行使用メモリ | 7,720 KB |
最終ジャッジ日時 | 2025-08-28 00:46:51 |
合計ジャッジ時間 | 5,687 ms |
ジャッジサーバーID (参考情報) |
judge2 / judge1 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 5 RE * 16 |
ソースコード
fun readInt () = valOf (TextIO.scanStream (Int.scan StringCvt.DEC) TextIO.stdIn) val () = let val n = readInt () val m = readInt () val ans = ((n div 1000) div m) * 1000 in print (Int.toString ans ^ "\n") end