Цикл ДЛЯ КАЖДОГО в языке Паскаль

Посмотрите, в предыдущем параграфе решалась задача, когда рост нужно было спросить у 6 человек. Нам пришлось позаботиться о том, чтобы Паскаль попросил ввести рост 6 раз. Для этого мы:

§ взяли некоторую переменную i целого типа, сами задали ей начальное числовое значение равное 1 (i:=0;),

§ а затем стали менять значение i, прибавляя каждый раз по 1, (i:=i+1;) перед тем как рост надо ввести т.е. стали считать какой очередной раз мы собираемся запросить рост. i у нас стало счетчиком числа повторений «запрашивания» роста.

§ затем возвращались на проверку того, что наше i меньше 6. Как только i становилось равно 6, мы прекращали запрашивать рост.

В этой задаче рост нужно было запросить для каждого из 6 опрашиваемых. Т.е. в этой задаче заранее было известно, сколько раз нужно запросить рост. В таком случае в Паскале используется другой тип цикла. Он называется ДЛЯ КАЖДОГО.

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

В нашем случае i:Integer;

А затем использовать и сам цикл ДЛЯ КАЖДОГО.

В нашем случае он будет выглядеть так:

FOR i:= 1 TO 6 DO begin

writeln('Введите Ваш рост');readln(c);

end;

Обратите внимание, что в заголовке мы указали, что переменная i должна меняться от 1 до 6, и поэтому в теле цикла уже не заботимся о ее изменении, а только записываем те команды, которые нужно выполнить 6 раз. О переменной i можно сказать, что в процессе работы цикла она принимает сначала значение 1, затем 2, затем 3 и т.д. до 6. Для каждого из этих значений i выполняется тело цикла, которое начинается со слова begin и заканчивается словом end;

В общем виде цикл ДЛЯ КАЖДОГО записывается так:

FOR переменная цикла:= начальное знчение TO конечное значение DO

^{переменной цикла переменной цикла}

Begin

команда1;

команда2;

...

командаn;

end;

Переменная цикла является счетчиком числа повторений тела цикла.

Начальное знчение переменной цикла меньше или равно конечному значению переменной цикла

И то и другое всегда типа Integer.

§ 23 Работа цикла ДЛЯ КАЖДОГО (FOR)

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

Затем переменная цикла принимает следующее по порядку целое числовое значение (оно всегда на 1 больше прдыдущего), и, если оно не превосходит конечного значения, то вновь выполняется тело цикла и т.д.

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

Этот цикл не может зациклить.

Если же Вы ошибетесь и задатите начальное значение переменной цикла больше ее конечного значения, то цикл не выполнится ни разу.