home *** CD-ROM | disk | FTP | other *** search
- procedure iadd(var a: integer; b: integer);
- procedure isub(var a: integer; b: integer);
- procedure imult(var a: integer; b: integer);
- procedure idiv(var a: integer; b: integer);
- procedure radd(var a: real; b: real);
- procedure rsub(var a: real; b: real);
- procedure rmult(var a: real; b: real);
- procedure rdiv(var a: real; b: real);
- procedure rrange(var a: real; b,c: real);
- procedure irange(var a: integer; b,c: integer);
-