MODULE RArith;
VAR ExitCode : INTEGER;
BEGIN
  ExitCode := 2 * 3 + 4 - 10 DIV 3 + 7 MOD 3
END RArith.