program program4
C
C  this program illustrates data types
C

      print*,' enter a real number with decimal '
      read(5,*)n
      print*,n
      end