Определите, что делает функция, приведенная ниже:
function n \(var a,b: integer\): integer;
var c: integer;
begin
repeat
if a > b then
a := a mod b
else
b := b mod a;
until \(a = 0\) or \(b = 0\);
n := a + b;
end;