1 578
editací
Změny
High
,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]]
;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]]