module A
  sub main()
    dim RD as string
    dim SD() as string
    dim CD as long
    dim SQ as double
    dim ans as string
    
    RD = console.readline()
    SD=split(RD," ")
    CD=clng(SD(0) & SD(1))
    SQ=System.Math.Sqrt(9)
    SQ=int(SQ)
    
    if CD= (SQ*SQ)  then
      ans = "YES"
    else
      ans = "NO"
    end if
   
    console.writeline(ans)
    
  end sub
end module