BEGIN
    i := 1;
    j := 2;

    IF i < --j THEN WRITE(100) ELSE WRITE(-100) FI
END