For...to

Z Delphi & Pascal (česká wiki)
Skočit na navigaci Skočit na vyhledávání

for~...~downto

Příkaz cyklu for způsobí, že příkaz za slovem do je opakovaně vykonáván pro každou hodnotu řídící proměnné v intervalu první..poslední.

Syntaxe
for identifikátor :=první to poslední do
  příkaz

NEBO

for identifikátor :=první downto poslední do
  příkaz


Popis
Řídící proměnná, první a poslední hodnota musí být ordinálního typu.


to

Vyhrazené slovo to způsobí, že hodnota řídící proměnné bude při každém průchodu cyklu zvětšena o 1.


downto

Downto způsobí, že hodnota řídící proměnné bude při každém průchodu cyklu zmenšena o 1.

Příklad

(* for ... to, for ... downto *)
for I :=1 to ParamCount do
  WriteLn(ParamStr(I);
for I :=1 to 10 do
  for J :=1 to 10 do
  begin
    X :=0;
    for K :=1 to 10 do
       X :=X + Mat1[I, K] * Mat2[K, J];
    Mat[I, J] :=X;
  end;