PROGRAM integer_math_demo;

VAR a,b,c,d : INTEGER;
    e       : REAL;

BEGIN
  a := 9;                   (* Simple assignment *)
  b := a + 4;               (* simple addition *)
  c := a + b;               (* simple addition *)
  d := 4*a*b;               (* multiplication *)
  e := a/b;                 (* integer division with the result
                               expressed as a real number *)
  d := b div a;             (* integer division with the result
                               expressed as a truncated integer
                               number *)
  d := b mod a;             (* d is the remainder of the division,
                               in this case d = 4 *)
  d := (a + b) div (b + 7); (* composite math statement *)

 (* It will be up to you to print out some of these values *)

END.