Mail.RuПочтаМой МирОдноклассникиИгрыЗнакомстваНовостиПоискВсе проекты

Задача Паскаль

Ученик (49), закрыт 4 года назад
Определить для двух натуральных числе a и b наибольший общий делитель НОД

Пример
Введите два числа

36 24

НОД (36,24)=12
Лучший ответ
Очень просто:
function NOD(a, b : Word) : Word;
begin
while (a<>0) and (b<>0) do if a>b then a:=a mod b else b:=b mod a;
NOD := a + b;
end;
Остальные ответы
Похожие вопросы
Также спрашивают