home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS 1992 June / SIMTEL_0692.cdr / msdos / turbopas / tpuobj.arc / PASSUM.PAS next >
Pascal/Delphi Source File  |  1988-04-04  |  195b  |  15 lines

  1. unit PasSum;
  2.  
  3. interface
  4.  
  5.   procedure Sum_0(X,Y: Integer; var Res: Integer);
  6.  
  7. implementation
  8.   procedure Sum_0(X,Y: Integer; var Res: Integer);
  9.   begin
  10.     Res:= X+Y;
  11.   end;
  12.  
  13. end.
  14.  
  15.