Submission #2213604


Source Code Expand

structure SC = StringCvt
structure T  = TextIO

fun nextInt () = valOf (T.scanStream (Int.scan SC.DEC) T.stdIn)

val () =
    let
      val (a, b, c) = (nextInt (), nextInt (), nextInt ())
    in
      if b - a = c - b then print "YES\n" else print "NO\n"
    end

Submission Info

Submission Time
Task A - ι⊥l
User masquerade0324
Language Standard ML (MLton 20100608)
Score 100
Code Size 275 Byte
Status AC
Exec Time 1 ms
Memory 256 KB

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 100 / 100
Status
AC × 3
AC × 12
Set Name Test Cases
Sample 0_000.txt, 0_001.txt, 0_002.txt
All 0_000.txt, 0_001.txt, 0_002.txt, A.txt, fever0.txt, fever7.txt, kure.txt, ma.txt, max.txt, nhk.txt, v.txt, xam.txt
Case Name Status Exec Time Memory
0_000.txt AC 1 ms 256 KB
0_001.txt AC 1 ms 256 KB
0_002.txt AC 1 ms 256 KB
A.txt AC 1 ms 256 KB
fever0.txt AC 1 ms 256 KB
fever7.txt AC 1 ms 256 KB
kure.txt AC 1 ms 256 KB
ma.txt AC 1 ms 256 KB
max.txt AC 1 ms 256 KB
nhk.txt AC 1 ms 256 KB
v.txt AC 1 ms 256 KB
xam.txt AC 1 ms 256 KB