      IDENTIFICATION DIVISION.
      PROGRAM-ID. 058A.
      DATA DIVISION.
      WORKING-STORAGE SECTION.
      01 INP PIC X(100).
      01 A   PIC 9(3).
      01 B   PIC 9(3).
      01 C   PIC 9(3).
      
      01 ANS1 PIC 9(3).
      01 ANS2 PIC 9(3).
      
      PROCEDURE DIVISION.
      ACCEPT INP.
      UNSTRING INP DELIMITED " "
      INTO A B C.
      
      COMPUTE ANS1 = B - A.
      COMPUTE ANS2 = C - B.
      
      IF ( A > B ) AND ( B > C)
	      DISPLAY "YES"
		ELSE
    	  DISPLAY "NO"
      END-IF.
      
      STOP RUN.