Как найти НОД через оператор for ? Помогите плиииз!!
там вообще циклы не нужны
а если через циклы, то для этого есть while
Ну просто учительница задала найти нод через репит вайл и фор я не пойму как это через фор
напишите ей решение через рекурсию и скажите, что цикл for тут не подходит, потому что неизвестно число итераций
Спасибо , а можете без циклов написать?
Спасибо
function GCD(a, b: integer): integer;
begin
if b = 0 then
Result := a
else
Result := GCD(b, a mod b)
end;
var
a, b: integer;
Read(a, b);
Write(GCD(a, b));
end.