program main
  implicit none
  
  integer :: a,b,i,j,p,q
  
  read(*,*)a,b
  if (b < 10) then
    p = 10*a+b
  else if (b < 100) then
    p = 100*a+b
  else
    p = 1000*a+b
  end if
  
  q = int(sqrt(real(p)))
  if (q*q == p) then
    write(*,*)'Yes'
  else
    write(*,*)'No'
  end if
end program main