program ch1401
!
! Simple character i/o
!
  character (80) :: line

  read *, line
  print *, line
end program