Оператор цикла с предусловием
Оператор цикла с предусловием используется в программе в случае, когда заранее не известно количество элементов последовательности и соответственно количество повторений операторов.
Данный оператор имеет следующую структуру:
While <условие> do <оператор>;
Здесь While, do - зарезервированные слова (пока [выполняется условие], делать);
<условие> - выражение логического типа;
<оператор> - произвольный оператор Turbo Pascal.
Работает оператор следующим образом. Вначале вычисляется условие, если результат вычисления имеет значение ИСТИНА, то выполняется оператор в цикле, после чего вычисление выражения <условие> и его проверка повторяются. Если логическое выражение имеет значение ЛОЖЬ, оператор While прекращает свою работу.
Также как и в операторе цикла с параметром, в цикле с предусловием при использовании нескольких исполняемых операторов эта группа оператор заключается в логические скобки.
Пример 1.
Дана последовательность целых чисел за которой следует ноль. Вычислить сумму элементов последовательности.
| .... | Program primer1; Var i, a, s : integer; Begin s := 0; Read (a); While a <> 0 do begin s := s + a; Read (a); end; Write ('Сумма элементов равна ', s); End. |
////| < Предыдущая | Следующая > |
|---|