PROGRAM MFD C FORTRAN EXAMPLE C PLACE THIS CODE IN A FILE NAMED C MFD.FOR C C THIS PROGRAM SUMS THE NUMBERS 1 THROUGH 100 C AND PRINTS THE RESULT ON THE TERMINAL C C The following programs are used in the RT-11 User and RT-11 C Programmer self paced instruction courses for RT-11 V4.They are also C similar to programs used in the Programming with RT-11 series for C RT-11 V5.0 or later. The name of the files are as specified in the C self paced course. C C The code is supplied as a service as Digital does not supply these C on diskette. C Any copyright is the property of Digital Equipment Corporartion C IS=0 DO 10 N=1,100 10 IS=IS+N WRITE(5,20)IS 20 FORMAT(1X,'THE SUM OF THE NUMBERS 1 THROUGH 100 IS ',I4) CALL EXIT END