Změny

Skočit na navigaci Skočit na vyhledávání

High

Přidáno 1 512 bajtů, 5. 10. 2012, 14:52
bez shrnutí editace
Vrací nejvvyšší hodnotu rozsahu argumentu.

;Deklarace
function High(X)

;Režim
:Windows, Reálný, Chráněný

;Poznámky
:Výsledný typ je X, nebo typ indexu X.

:X je buď identifikátor typu nebo odkaz na proměnnou. Typ udávaný argumentem X nebo typ proměnné, odkazované argumentem X, musí být jeden z následujících typů.

{| class="wikitable"
! align="left" | Pro tento typ !! align="left" | High vrací:
|-----------------------------
| Ordinální
| nejvyšší hodnotu v rozsahu tohoto typu
|----------------------------------------------------
| Pole
| nejvyšší hodnotu v rozsahu typu indexu tohoto pole
|-----------------------------
| Řetězec
| deklarovanou velikost řetězce
|-----------------------------
| Otevřené pole a řetězcový parametr
| hodnotu typu Word, udávající počet prvků ve skutečném parametru mínus jeden prvek
|}


;Viz také
:[[Low]]


Vzorový příklad

{High.PAS}
{Vzorový příklad pro funkci High.}
{ Pro Windows: }
{ uses WinCrt; }
function Sum(var X: array of Real): Real;
var
I: Word;
S: Real;
begin
S := 0;
for I := 0 to High(X) do S := S + X[I];
Sum := S;
end;
var
List1: array[0..3] of Real;
List2: array[5..17] of Real;
X: Word;
begin
for X := Low(List1) to High(List1) do
List1[X] := X * 3.4;
for X := Low(List2) to High(List2) do
List2[X] := X * 0.0123;
Writeln (Sum(List1));
Writeln ('Součet List2:', Sum(List2));
end.

[[Category:System]]
[[Category:Funkce System]]

Navigační menu