d_multi.LST 201 B

12345678910111213
  1. Listing:
  2. 1 MODULE DMulti;
  3. 2 IMPORT ALib;
  4. 3 FROM BLib IMPORT GetB;
  5. 4 VAR ExitCode : INTEGER;
  6. 5 BEGIN
  7. 6 ExitCode := GetB() + ALib.aval
  8. 7 END DMulti.
  9. 0 errors