
      REAL	LENGTH, WIDTH, AREA

      LENGTH = 18.0
      WIDTH  = 12.5
      AREA   = LENGTH * WIDTH

      PRINT *, 'AREA IS ', AREA

      END

