Запишите алгоритм Евклида. Найти наибольший общий делитель (НОД) двух целых положительных чисел.

juliana123456 juliana123456    3   17.06.2020 23:26    0

Ответы
ИлонаУстюгова12 ИлонаУстюгова12  15.10.2020 14:22

 function nod( a, b: longint): longint;

 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;

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика