C     THIS IS THE MAIN PROGRAM         
      PROGRAM MYPROG1                 
      REAL A, B, C
      WRITE (6,*) 'ENTER TWO NUMBERS:' 
      READ  (5,*) A, B                
C                                    
C     DO SOME HEAVY COMPUTATION     
C                                  
      C = A + B                   
C                                
C     WRITE THE OUTPUT          
C                              
      WRITE (6,20) C                   
   20 FORMAT('VALUE OF C = ',F7.2)    
      END