Страница 1 из 1

Помогите найти НОД

Добавлено: Ср июн 07, 2017 2:03 pm
Diesel
Написать процедуру,определяющую НОД n чисел

NOD:= proc(a::list)
for i from 1 to b do
igcd(a[i]);
end proc:
b:=2;
a:=(3,2);
NOD(a);