!> a(x - p)(x - q) !> == ax^2 - a(p + q)x + apq !> b^2 == a^2(p + q)^2 !> 4ac == 4a * apq == 4 a^2 pq !> b^2 > 4ac !> (p + q)^2 > 4 pq !> (p + q)^2 - 4 pq > 0 !> p^2 + q^2 +2pq - 4 pq > 0 !> p^2 + q^2 - 2 pq > 0 !> (p^2 - q^2) > 0 !> .eqv. p /= q program yukicoder_2508 use, intrinsic :: iso_fortran_env implicit none integer(int32), parameter :: max_len = 10**5 character(len=:), allocatable :: a, p, q allocate(character(len=max_len) :: a, p, q) read(input_unit, *) a, p, q write(output_unit, '(a)') trim(merge("Yes", "No ", trim(p) /= trim(q))) end program yukicoder_2508