Pętla Repeat Until

repeat warunek until instrukcje;

 var 
 x,i: integer;
 begin
   x:= 0; i:= 1;
   repeat
     x:= x+i;
     readln (i);
   until i>8;
   writeln ('x= ',x);
   readln;
 end.

Pętla jest tak długo wykonywana dopóki warunek wyjścia nie jest prawdziwy.

REPEAT 
        wypisz(tekst,ile);
UNTILL keypressed;

Jeśli ktoś naciśnie klawisz, warunek będzie prawdziwy i iteracja zostanie przerwana.

Podobne strony

Podobne Strony • Slowa Kluczowe • Pętla for • Const • Zmienne • begin-end • Typy danych • Biblioteki • Procedura

strona 2 z 2« poprzednia12

_edit_ . _edit sections_