MODULE Compare; IMPORT In, Out; VAR a,b: INTEGER; BEGIN In.Int(a); In.Int(b); IF a < b THEN Out.Int(a,0); Out.String(" is less than "); Out.Int(b,0); Out.Ln; ELSIF a = b THEN Out.Int(a,0); Out.String(" is equal to "); Out.Int(b,0); Out.Ln; ELSIF a > b THEN Out.Int(a,0); Out.String(" is greater than "); Out.Int(b,0); Out.Ln; END; END Compare.