Первый вариант алгоритма Евклида для n чисел можно модифицировать так:
Procedure nEuclid(a:mas; n:Integer;
Var d:Integer);
Var i:Integer;
Begin
d:=a[1]; i:=1;
While (d<>1) And (i<=n) Do Begin
Euclid (d,a[i],d); i:=i+1;
End;
End;
На каком факте основывается данная модификация?
192
410
Ответы на вопрос:
Популярно: Информатика
-
angelokfrimen11.02.2023 11:18
-
marchaika201425.09.2022 22:19
-
prudniksveta07.03.2020 02:46
-
olgadyra24.01.2021 12:59
-
Ulia20925.11.2021 03:24
-
lesta203.10.2022 20:52
-
sabovkristiурис14.08.2022 09:52
-
magomed20049513.05.2023 02:48
-
Amer1111125.01.2023 22:57
-
orlovs201725.01.2023 15:49