Цикл repeat Delphi

Как и в случае инструкции while, инструкция repeat Delphi применяется тогда, когда нужно провести повторные вычисление (осуществить организацию цикла), однако количество повторений в процессе создания программы заранее неизвестно, и поэтому это число можно определить лишь в момент выполнения программы, то есть количество зависит от хода вычислений.


Общий вид цикла repeat Delphi:

Общий вид инструкции repeat Delphi представлен ниже:

Цикл repeat Delphi

откуда условие есть выражение типа Boolean, которое определяет условия завершения цикла.

Последовательность цикла repeat Delphi:

Последовательность выполнения инструкции repeat в языке Delphi такова:

  1. На первом этапе осуществляется выполнение находящихся между служебными словами repeat и untilинструкций тела цикла.
  2. Далее определяется, какое значение примет выражение условие. Если это условие оказалось ложным (то есть условие приняло значение False), то происходит повторное выполнение инструкций тела цикла.
  3. Если же условие оказалось истинным (то есть оказалось равным True), то цикл repeat завершает свое выполнение.

В итоге получаем, что инструкции цикла, которые находятся между зарезервированными словами repeat и until, повторяются, пока условие является ложным (то есть пока условие принимает значение False).

Представим алгоритм (рис. ниже), который реализует инструкцию repeat:Цикл repeat Delphi

Заметка. Инструкции цикла, располагающиеся между служебными словами  repeat и until, должны выполняться минимум один раз. Чтобы цикл завершил свое выполнение, нужно следить за тем, чтобы инструкции цикла repeat, размещающиеся между зарезервированными словами repeat и until, в конце концов, изменяли значения переменных, которые входят в состав выражения условие.

Пример программы с циклом repeat Delphi:

Создадим программу, использующую инструкцию repeat, которая бы проводила проверку числа (введенного пользователем с клавиатуры), является ли данное число простым. Из математики известно, что число именуется простым в случае, когда оно делится только на само себя и на единицу, например, число 42 является обычным, поскольку делится на 42, на 1, на 2, на 3, на 6, на 7, на 21, а число 11 как раз и является простым (делится только на 13 и на 1.

В программе, чтобы проверить число n, является ли оно простым, можно при помощи деления числа n на 2, на 3 и т.д. до n и последующей проверкой остатка, появляющегося после каждого деления. Когда очередное деление завершилось появлением нулевого остатка, то это значит, что определено число, на которое число n делится нацело без остатка.

Проведя сравнение двух чисел: числа n и числа, на которое число n поделилось без остатка — можно установить, является ли введенное пользователем число n простым. На рисунке ниже представлена форма приложения под названием «Простое число«:

Цикл repeat Delphi

 


Похожие записи:

Оставить комментарий

Ваш e-mail не будет опубликован. Обязательные поля отмечены *