Информатика, опубликовано 2018-08-22 23:30:56 by Гость
Вычислить наибольший общий делитель двух натуральных чисел А и В используя цикл с постусловием
Ответ оставил Гость
Var a, b, n: integer;
begin
writeln (Введите два числа: );
readln (a, b);
repeat
if a > b then a := a mod b
else b := b mod a;
until (a = 0) or (b = 0);
n := a+b;
writeln (НОД = , n);
end.
Пример:
125 50
НОД = 25
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на