program apple
implicit none
integer::d, n
 read(5,*)d, n
  if(d==0 .and. n<100) then
   print*,n
  else if(d==0 .and. n==100)then
   print*,101
  else if(d==1 .and. n<100)then
   print*,n*100
  else if(d==1 .and. n==100)then
   print*,10100
  else if(d==2 .and. n<100)then
   print*,n*10000
  else
   print*,1010000
  end if
end program apple