program birth

      integer day, month, year

      write(5,*), 'Enter month'
      read(5,*) month
      write(5,*) 'Enter day'
      read(5,*) day
      write(5,*) 'Enter year'
      read(5,*) year
      write(5,*) 'Your birthday is', month, '-', day, '-', year
      end