PROGRAM Max1;

FUNCTION Max(I: Integer; J: Integer) : Integer;
BEGIN
    IF (I > J) THEN
        Max := I
    ELSE
        MAX := J;
END;

BEGIN
    WriteLn(Max(5, 10));
    WriteLn(Max(10, 5));
END.
