Книга: Конец холивара. Pascal vs C
Назад: 2.2. Повторение (операторы цикла)
Дальше: 2.2.2. Цикл типа “до” (цикл с постусловием)
2.2.1. Цикл типа “пока” (цикл с предусловием)
Пример 1.4: Нахождение наибольшего общего делителя двух целых положительных чисел с помощью известного алгоритма Евклида.
Пока X ≠ Y делать
если X> Y
то X:=X-Y
иначе Y:=Y-X;
Писать (‘НОД=’, X);
WHILE X <> Y DO
IF X> Y
THEN X:=X-Y
ELSE Y:=Y-X;
WRITE (‘НОД=’, X);
WHILE – пока
DO – делать
Цикл с предусловием
