      IDENTIFICATION DIVISION.
      PROGRAM-ID. 052A.
      DATA DIVISION.
      WORKING-STORAGE SECTION.
      01 INP PIC X(100).
      01 A PIC 9(5).
      01 B PIC 9(5).
      01 C PIC 9(5).
      01 D PIC 9(5).
	  01 ANS1 PIC 9(10).
	  01 ANS2 PIC 9(10).
	  01 ANSS1 PIC Z(10).
	  01 ANSS2 PIC Z(10).
      
      PROCEDURE DIVISION.
      ACCEPT INP.
      UNSTRING INP DELIMITED BY ALL " "
      INTO  A
      		B
      		C
      		D.
      DISPLAY INP.
      DISPLAY A.
      DISPLAY B.
      DISPLAY C.
      DISPLAY D.
      
      COMPUTE ANS1 = A * B.
      COMPUTE ANS2 = C * D.
	  MOVE ANS1 TO ANSS1.
      MOVE ANS2 TO ANSS2.
      
      IF ANS1 >=  ANS2
      THEN
      	 DISPLAY ANSS1
      ELSE
      	 DISPLAY ANSS2
      END-IF.
      STOP RUN.