結果

問題 No.169 何分かかるの!?
ユーザー tanson
提出日時 2025-09-06 06:01:41
言語 Standard ML
(MLton 20210117)
結果
AC  
実行時間 1 ms / 1,000 ms
コード長 258 bytes
コンパイル時間 5,026 ms
コンパイル使用メモリ 687,364 KB
実行使用メモリ 7,720 KB
最終ジャッジ日時 2025-09-06 06:01:52
合計ジャッジ時間 6,666 ms
ジャッジサーバーID
(参考情報)
judge1 / judge3
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 2
other AC * 22
権限があれば一括ダウンロードができます

ソースコード

diff #

fun readInt () =
    valOf (TextIO.scanStream (Int.scan StringCvt.DEC) TextIO.stdIn)


val () =
    let
        val k = readInt ()
        val s = readInt ()

        val ans = (k * s) div (100 - k) + s
    in
        print (Int.toString ans ^ "\n")
    end
0