TURBO PASCAL:Учебное пособие. Терёхин В.В. - 47 стр.

UptoLike

ВУЗ: 

НФИ КемГУ | Новокузнецк

Составители: 

Рубрика: 

47
17 Циклы
Паскаль предлагает три различных оператора цикла,
которые применяются в определенных ситуациях.
17.1 Цикл типа for
Этот цикл принято использовать, когда известно коли-
чество итераций и на каждом шаге требуется знать ее номер
или соответствующий ей элемент порядкового типа. В цикле
for используется счетчик, который увеличивается или умень-
шается автоматически. Существуют две формы цикла — пря-
мая и обратная.
Прямая:
for <идентификатор_переменной порядкового типа>:=
<n1> to <n2> do <оператор>;
n1 - меньшее значение соответствующего типа, n2 -
большее значение соответствующего типа. Если при исполь-
зовании прямого цикла начальное значение управляющей
переменной (счетчика) больше конечного, то тело цикла вооб-
ще не выполняется.
Примеры:
1)
for i:=1 to 100 do S:= S + i*i;
2)
for c:= 'A' to 'Z' do Writeln(ord(c), ' - ', c) ;
3)
for t:= 300 to 400 do if t mod 3= 0 then Writeln(t);
Обратная:
for <идентификатор переменной порядкового типа>:=
<n1> downto <n2> do <оператор>;
nl — большее значение соответствующего типа;
n2 - меньшее значение соответствующего типа. 
      17 Циклы

      Паскаль предлагает три различных оператора цикла,
которые применяются в определенных ситуациях.

       17.1 Цикл типа for
       Этот цикл принято использовать, когда известно коли-
чество итераций и на каждом шаге требуется знать ее номер
или соответствующий ей элемент порядкового типа. В цикле
for используется счетчик, который увеличивается или умень-
шается автоматически. Существуют две формы цикла — пря-
мая и обратная.
       Прямая:
       for <идентификатор_переменной порядкового типа>:=
 to  do <оператор>;
       n1 - меньшее значение соответствующего типа, n2 -
большее значение соответствующего типа. Если при исполь-
зовании прямого цикла начальное значение управляющей
переменной (счетчика) больше конечного, то тело цикла вооб-
ще не выполняется.
       Примеры:
       1)
for i:=1 to 100 do     S:= S + i*i;

        2)
for c:= 'A' to 'Z' do Writeln(ord(c), ' - ', c) ;

       3)
for t:= 300 to 400 do if t mod 3= 0 then Writeln(t);

      Обратная:
      for <идентификатор переменной порядкового типа>:=
 downto  do <оператор>;
      nl — большее значение соответствующего типа;
      n2 - меньшее значение соответствующего типа.
                                                          47

Страницы