Составьте программу нахождения наименьшего общего кратного (нок) двух чисел, используя формулу: а × в = нод(а, в) × нок(а, в).

Function nod (var m,n: integer): integer;   begin  while (m*n < > 0) do  begin  m : = m mod n;   n : = n mod m;   end;   if (m = 0) then nod : = n  else nod : = m;   end;  используй эту функцию в программе: nod_ab : = nod (a, b); nod_abc : = nod(nod_ab,c).  аналогично с нок.