Question

Помогите понять в чем ошибка?:
function gcd(a, b: integer): integer;
begin
if b = 0 then gcd := a
else gcd := gcd(b, a mod b)
end;

function lcm(a, b: integer): integer;
begin
lcm := a div gcd(a, b) * b
end;

Answer 1

последний end не ; , а на точку