      IDENTIFICATION DIVISION.
      PROGRAM-ID. 052B.
      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 OUT PIC ZZZZZZZZZ9.
      
      PROCEDURE DIVISION.
      ACCEPT INP.
      UNSTRING INP DELIMITED BY " "
      INTO A B C D.
      COMPUTE ANS1 = A * B.
      COMPUTE ANS2 = C * D.
      IF ANS1 = ANS2
      	MOVE ANS1 TO OUT
      ELSE 
      	IF ANS1 < ANS2
      		MOVE ANS2 TO OUT
      	ELSE
      		MOVE ANS1 TO OUT
      	END-IF
      END-IF.
      
      DISPLAY FUNCTION TRIM(OUT).
      
      STOP RUN.
  