      PROGRAM piyo
      IMPLICIT NONE
      INTEGER,PARAMETER :: prec = 16
      character(3) :: s
      
      read*,s
      
      print'(a)',s
      
      
      
      
      stop
      !debugg
      
      
      
      END PROGRAM