Книга: Конец холивара. Pascal vs C

2.2.2. Цикл типа “до” (цикл с постусловием)

2.2.2. Цикл типа “до” (цикл с постусловием)

Этот цикл выполняется не менее одного раза

Пример 1.5: Решение предыдущей задачи.


Цикл с постусловием

Повторять

если X> Y

то X:=X-Y

иначе Y:=Y-X

до X=Y;

Писать (‘НОД=’, X);

REPEAT

IF X> Y

THEN X:=X-Y

ELSE Y:=Y-X

UNTIL X=Y;

WRITE (‘НОД=’, X);

REPEAT – повторять

UNTIL – до

Оглавление книги


Генерация: 1.192. Запросов К БД/Cache: 3 / 1
поделиться
Вверх Вниз