home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / library / dos / tp6goodi / error / multtest.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1991-01-06  |  147 b   |  10 lines
  1. uses mult;
  2. var
  3.   w1,w2,w3:word;
  4. begin
  5.   TrapMultError := false;
  6.   W1 := 32000;
  7.   w2 := 32000;
  8.   w3 := multword(w1,w2);
  9.   writeln(w3);
  10. end.