Помогите понять в чем ошибка?:
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;
Приложения:
Ответы
Ответ дал:
0
последний end не ; , а на точку
Вас заинтересует
1 год назад
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад