program assign1_1
implicit none
integer :: xxx
   xxx=2**20
   print*,'2 to power of 20 =',xxx
end program assign1_1