結果
問題 |
No.410 出会い
|
ユーザー |
|
提出日時 | 2025-10-02 00:13:59 |
言語 | Standard ML (MLton 20210117) |
結果 |
AC
|
実行時間 | 1 ms / 2,000 ms |
コード長 | 480 bytes |
コンパイル時間 | 7,465 ms |
コンパイル使用メモリ | 689,656 KB |
実行使用メモリ | 7,716 KB |
最終ジャッジ日時 | 2025-10-02 00:14:08 |
合計ジャッジ時間 | 5,385 ms |
ジャッジサーバーID (参考情報) |
judge3 / judge2 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 4 |
other | AC * 19 |
ソースコード
fun readInt () = valOf (TextIO.scanStream (Int.scan StringCvt.DEC) TextIO.stdIn) fun findAns a b = if a = b then "0" else if a < b then "+" ^ (Int.toString (b - a)) else "-" ^ (Int.toString (a - b)) val () = let val px = readInt () val py = readInt () val qx = readInt () val qy = readInt () val ans = Real.fromInt (abs (px - qx) + abs (py - qy)) / 2.0 in print (Real.toString ans ^ "\n") end