Напишите логическую функцию которая определяет являются ли два переданные ей числа взаимно простыми, то есть, не имеющими общих делителей, кроме 1. (На языке Паскаль)

Предыдущий
вопрос Следующий
вопрос

function isRelativelyPrime(a, b: Integer) : Boolean
va
i: Integer
begi
isRelativelyPrime := True
for i := 2 to Min(a, b) d
begi
if (a mod i = 0) and (b mod i = 0) the
begi
isRelativelyPrime := False
Break
end
end
end;