(* O(n) (n = max {a, b}) *)
Scanf.scanf "%s %s" @@ fun a b ->
  let m = a ^ b |> int_of_string in
  let rec find i =
    if i * i = m then "Yes"
    else if i * i > m then "No"
    else find (i + 1) in
  find 1 |> print_endline