Cyklus s konečným počtom opakovaní

• príkaz for-cyklu v pascale má všeobecný tvar:
     for riadiaca_premenná:=výraz1 to výraz2 do príkaz

(for riadiaca_premenná:=výraz1 downto výraz2 do príkaz - hodnota výrazu výraz2  musí byť menšia alebo rovná ako hodnota výrazu výraz1)

• pre riadiacu premennú (premennú cyklu for) platí:

  • priradí sa jej hodnota akú nadobúda výraz1

  • výraz2 sa vyhodnotí na začiatku cyklu
  • ak je jeho hodnota menšia ako hodnota výraz1, cyklus sa nevykoná
  • ak je výraz1=výraz2, cyklus prebehne práve raz
  • inak riadiaca_premenná prechádza rozsahom hodnôt medzi výraz1 a výraz2
  • musí byť ordinálneho typu (zatiaľ poznáme len celočíselný ordinálny typ - integer)
  • jej hodnotu programátor v priebehu cyklu nesmie meniť, t.j. nesmie byť na ľavej strane žiadneho priraďovacieho príkazu počas prechodu for-cyklu
  • po skončení cyklu má nedefinovanú hodnotu (označujeme '?')
  • Poznámka: Po skončení cyklu riadiaca premenná nemá hodnotu, ktorú nadobúda výraz2+1 ani žiadnu inú, jej podobnú.
• ak chceme v cykle opakovať viac príkazov - uzavrieme ich medzi begin a end

procedure TForm1.Button1Click(Sender: TObject); 

var
  i:integer;
begin
  for i:=1 to 10 do
    g.Rectangle(i*30, 10, i*30+20, 200);
end;

end;

• táto procedúra nakreslí 10 obdĺžnikov
• prvý riadok var i:integer; definuje jednu celočíselnú premennú
  • môže nadobúdať hodnoty z intervalu -2 147 483 648 .. 2 147 483 647
  • celočíselná aritmetika pascalu pozná tieto operácie:   +, -, *, div a mod

návrat