Ответы
Ответ дал:
0
function Nod(a,b:integer):integer;
begin
if a>b then Nod:=Nod(a-b,b)
else
if a<b then Nod:=Nod(a,b-1)
else Nod:=a;
end;
begin
if a>b then Nod:=Nod(a-b,b)
else
if a<b then Nod:=Nod(a,b-1)
else Nod:=a;
end;
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад