Поделитесь своими знаниями, ответьте на вопрос:
Даны натуральные числа a и b. найти их наименьшее общее кратное, определив функцию для расчета наибольшего общего делителя двух натуральных чисел, используя алгоритм евклида. решить в паскале без всяких сложных программных штучек, т.е на уровне 10 класса! : 3*
формула нахождения нок двух чисел a и b
1) нок=(a*b) / нод(a,b)
program findnok; uses crt; var n,m,res,nok: integer; function evklid( a, b: longint): longint; begin while (a < > 0) and (b < > 0) do if a > = b then a: = a mod b else b: = b mod a; evklid: = a + b; end; begin clrscr; writeln('введите a и b'); readln(m, n); res: = (evklid(n,m)); nok: = (m*n) div res; writeln('nok=',nok); readkey; end.