(*
ocamlfind ocamlopt -package batteries -linkpkg main.ml -o a.out
*)
open Batteries

let () = Scanf.sscanf (read_line ()) "%s %s" (
        fun a b -> 
                let n = float_of_string (a ^ b) in
                let h = floor (sqrt n) in
                        if (h ** 2.0) = n then
                                "Yes"
                        else
                                "No"
) |> Printf.printf "%s\n"
