sepres.mod 123 B

12345
  1. IMPLEMENTATION MODULE SepRes;
  2. PROCEDURE Add (x : INTEGER);
  3. BEGIN Value := Value + x END Add;
  4. BEGIN Value := 40
  5. END SepRes.