program PowerNumbers
  real :: a,b
  
  read(*,*) a, b
  
  !write(*,'(f10.5)') a/b
  !write(*,'(es12.4)') a/b
  write(*,'(es14.7)') a**b

end program PowerNumbers
