PROGRAM ch1702
!
! Simple character i/o
!
CHARACTER (80) :: Line
  READ '(A)' , Line
  PRINT *,Line
END PROGRAM ch1702