BLOCK DATA
    
      INTEGER     CMQUES (10)   
      INTEGER     OBQUES (10)   
      INTEGER     MPQUES (10)   
      INTEGER     ANSWER (14)   
      COMMON      /QUESTS/ CMQUES   
      COMMON      /QUESTS/ OBQUES   
      COMMON      /QUESTS/ MPQUES   
      COMMON      /QUESTS/ ANSWER   
      DATA     CMQUES /'IN','PU','T ','CO','MM','AN','D ','FI','LE','? '
     1/ 
      DATA     OBQUES /'OU','TP','UT',' O','BJ','EC','T ','FI','LE','? '
     1/ 
      DATA     MPQUES /'OU','TP','UT',' X','R-','MA','P ','FI','LE','? '
     1/ 
      END