323 lines
9.8 KiB
HTML
323 lines
9.8 KiB
HTML
<html><head>
|
|
<object type="application/x-oleobject" classid="clsid:1e2a7bd0-dab9-11d0-b93a-00c04fc99f9e">
|
|
<param name="Keyword" value="Inc">
|
|
<param name="Keyword" value="Dec">
|
|
<param name="Keyword" value="succ">
|
|
<param name="Keyword" value="pred">
|
|
<param name="Keyword" value="Odd">
|
|
<param name="Keyword" value="Ord">
|
|
</object></head>
|
|
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
|
|
<title></title><link rel="StyleSheet" href="../../default.css"><body>
|
|
<H1>Ïîäïðîãðàììû äëÿ ðàáîòû ñ ïåðå÷èñëèìûìè òèïàìè</H1>
|
|
<table border=0 CELLPADDING=5>
|
|
<tr><td>
|
|
<code>
|
|
<b><b>procedure</b></b> Inc(<b>var</b> i: integer);
|
|
</code><br>
|
|
Óâåëè÷èâàåò çíà÷åíèå ïåðåìåííîé
|
|
<code>i</code> íà 1
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b><b>procedure</b></b> Inc(<b>var</b> i: integer; n: integer);
|
|
</code><br>
|
|
Óâåëè÷èâàåò çíà÷åíèå ïåðåìåííîé
|
|
<code>i</code> íà <code>n</code>
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b><b>procedure</b></b> Dec(<b>var</b> i: integer);
|
|
</code><br>
|
|
Óìåíüøàåò çíà÷åíèå ïåðåìåííîé
|
|
<code>i</code> íà 1
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b><b>procedure</b></b> Dec(<b>var</b> i: integer; n: integer);
|
|
</code><br>
|
|
Óìåíüøàåò çíà÷åíèå ïåðåìåííîé
|
|
<code>i</code> íà <code>n</code>
|
|
</td></tr>
|
|
<tr>
|
|
<td>
|
|
<code>
|
|
<b>procedure</b> Inc(<b>var</b> c: char);
|
|
</code><br>
|
|
Óâåëè÷èâàåò êîä ñèìâîëà <code>c</code> íà 1
|
|
</td>
|
|
</tr>
|
|
<tr>
|
|
<td>
|
|
<code>
|
|
<b>procedure</b> Inc(<b>var</b> c: char; n: integer);
|
|
</code><br>
|
|
Óâåëè÷èâàåò êîä ñèìâîëà <code>c</code> íà
|
|
<code>n</code>
|
|
</td>
|
|
</tr>
|
|
<tr>
|
|
<td>
|
|
<code>
|
|
<b>procedure</b> Dec(<b>var</b> c: char);
|
|
</code><br>
|
|
Óìåíüøàåò êîä ñèìâîëà <code>c</code> íà 1
|
|
</td>
|
|
</tr>
|
|
<tr>
|
|
<td>
|
|
<code>
|
|
<b>procedure</b> Dec(<b>var</b> c: char; n: integer);
|
|
</code><br>
|
|
Óìåíüøàåò êîä ñèìâîëà <code>c</code> íà
|
|
<code>n</code>
|
|
</td>
|
|
</tr>
|
|
<tr><td>
|
|
<code>
|
|
<b><b>procedure</b></b> Inc(<b>var</b> <span lang="en-us">e</span>:
|
|
<span lang="en-us">System.Enum</span>);
|
|
</code><br>
|
|
Óâåëè÷èâàåò çíà÷åíèå
|
|
ïåðå÷èñëèìîãî òèïà <code><span lang="en-us">e</span></code> íà 1
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b><b>procedure</b></b> Inc(<b>var</b> <span lang="en-us">e</span>:
|
|
<span lang="en-us">System.Enum</span>; n: integer);
|
|
</code><br>
|
|
Óâåëè÷èâàåò çíà÷åíèå ïåðå÷èñëèìîãî òèïà <code><span lang="en-us">e</span></code>
|
|
íà <code>n</code>
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b><b>procedure</b></b> Dec(<b>var</b> <span lang="en-us">e</span>:
|
|
<span lang="en-us">System.Enum</span>);
|
|
</code><br>
|
|
Óìåíüøàåò çíà÷åíèå ïåðå÷èñëèìîãî òèïà <code><span lang="en-us">e</span></code> íà 1
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b><b>procedure</b></b> Dec(<b>var</b> <span lang="en-us">e</span>:
|
|
<span lang="en-us">System.Enum</span>; n: integer);
|
|
</code><br>
|
|
Óìåíüøàåò çíà÷åíèå ïåðå÷èñëèìîãî òèïà <code><span lang="en-us">e</span></code> íà 1
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">S</span>ucc(x: integer): integer;
|
|
</code><br>
|
|
Âîçâðàùàåò ñëåäóþùåå çà <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">S</span>ucc(x: boolean): boolean;
|
|
</code><br>
|
|
Âîçâðàùàåò ñëåäóþùåå çà <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">S</span>ucc(x: byte): byte;
|
|
</code><br>
|
|
Âîçâðàùàåò ñëåäóþùåå çà <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">S</span>ucc(x: shortint): shortint;
|
|
</code><br>
|
|
Âîçâðàùàåò ñëåäóþùåå çà <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">S</span>ucc(x: smallint): smallint;
|
|
</code><br>
|
|
Âîçâðàùàåò ñëåäóþùåå çà <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">S</span>ucc(x: word): word;
|
|
</code><br>
|
|
Âîçâðàùàåò ñëåäóþùåå çà <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">S</span>ucc(x: longword): longword;
|
|
</code><br>
|
|
Âîçâðàùàåò ñëåäóþùåå çà <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">S</span>ucc(x: int64): int64;
|
|
</code><br>
|
|
Âîçâðàùàåò ñëåäóþùåå çà <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">S</span>ucc(x: uint64): uint64;
|
|
</code><br>
|
|
Âîçâðàùàåò ñëåäóþùåå çà <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr>
|
|
<td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">S</span>ucc(x: char): char;
|
|
</code><br>
|
|
Âîçâðàùàåò ñëåäóþùåå çà <code>x</code> çíà÷åíèå
|
|
</td>
|
|
</tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">S</span>ucc(<span lang="en-us">e</span>:
|
|
<span lang="en-us">System.Enum</span>): <span lang="en-us">System.Enum</span>;
|
|
</code><br>
|
|
Âîçâðàùàåò ñëåäóþùåå çà <code>
|
|
<span lang="en-us">e</span></code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">P</span>red(x: boolean): boolean;
|
|
</code><br>
|
|
Âîçâðàùàåò ïðåäøåñòâóþùåå <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">P</span>red(x: byte): byte;
|
|
</code><br>
|
|
Âîçâðàùàåò ïðåäøåñòâóþùåå <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">P</span>red(x: shortint): shortint;
|
|
</code><br>
|
|
Âîçâðàùàåò ïðåäøåñòâóþùåå <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">P</span>red(x: smallint): smallint;
|
|
</code><br>
|
|
Âîçâðàùàåò ïðåäøåñòâóþùåå <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">P</span>red(x: word): word;
|
|
</code><br>
|
|
Âîçâðàùàåò ïðåäøåñòâóþùåå <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">P</span>red(x: integer): integer;
|
|
</code><br>
|
|
Âîçâðàùàåò ïðåäøåñòâóþùåå <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">P</span>red(x: longword): longword;
|
|
</code><br>
|
|
Âîçâðàùàåò ïðåäøåñòâóþùåå <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">P</span>red(x: int64): int64;
|
|
</code><br>
|
|
Âîçâðàùàåò ïðåäøåñòâóþùåå <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">P</span>red(x: uint64): uint64;
|
|
</code><br>
|
|
Âîçâðàùàåò ïðåäøåñòâóþùåå <code>x</code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr>
|
|
<td>
|
|
<code>
|
|
<b>function</b> <span lang="en-us">P</span>red(x: char): char;
|
|
</code><br>
|
|
Âîçâðàùàåò ïðåäøåñòâóþùåå <code>x</code> çíà÷åíèå
|
|
</td>
|
|
</tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> Pred(<span lang="en-us">e</span>: <span lang="en-us">System.Enum</span>):
|
|
<span lang="en-us">System.Enum</span>;
|
|
</code><br>
|
|
Âîçâðàùàåò ïðåäøåñòâóþùåå
|
|
<code>
|
|
<span lang="en-us">e</span></code> çíà÷åíèå
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> Odd(i: integer): boolean;
|
|
</code><br>
|
|
Âîçâðàùàåò True, åñëè <code>i</code> íå÷åòíî
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> Odd(i: longword): boolean;
|
|
</code><br>
|
|
Âîçâðàùàåò True, åñëè <code>i</code> íå÷åòíî
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> Odd(i: int64): boolean;
|
|
</code><br>
|
|
Âîçâðàùàåò True, åñëè <code>i</code> íå÷åòíî
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> Odd(i: uint64): boolean;
|
|
</code><br>
|
|
Âîçâðàùàåò True, åñëè <code>i</code> íå÷åòíî
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> Ord(a: char): byte;
|
|
</code><br>
|
|
Ïðåîáðàçóåò ñèìâîë â êîä</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> Ord(a: integer): integer;
|
|
</code><br>
|
|
Âîçâðàùàåò ïîðÿäêîâûé íîìåð çíà÷åíèÿ
|
|
<code>a</code>
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> Ord(a: longword): longword;
|
|
</code><br>
|
|
Âîçâðàùàåò ïîðÿäêîâûé íîìåð çíà÷åíèÿ
|
|
<code>a</code>
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> Ord(a: int64): int64;
|
|
</code><br>
|
|
Âîçâðàùàåò ïîðÿäêîâûé íîìåð çíà÷åíèÿ
|
|
<code>a</code>
|
|
</td></tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> Ord(a: uint64): uint64;
|
|
</code><br>
|
|
Âîçâðàùàåò ïîðÿäêîâûé íîìåð çíà÷åíèÿ
|
|
<code>a</code>
|
|
</td></tr>
|
|
<tr>
|
|
<td>
|
|
<code>
|
|
<b>function</b> Ord(a: boolean): integer;
|
|
</code><br>
|
|
Âîçâðàùàåò ïîðÿäêîâûé íîìåð çíà÷åíèÿ
|
|
<code>a</code>
|
|
</td>
|
|
</tr>
|
|
<tr><td>
|
|
<code>
|
|
<b>function</b> Ord(<span lang="en-us">e</span>: <span lang="en-us">System.Enum</span>): integer;
|
|
</code><br>
|
|
Âîçâðàùàåò ïîðÿäêîâûé íîìåð çíà÷åíèÿ
|
|
<code>
|
|
<span lang="en-us">e</span></code>
|
|
</td></tr>
|
|
</table>
|
|
</body></html>
|