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

Var a,b: integer; beginreadln(a,b);   while a< > b do  begin    if a> b then  a: =a-b  else b: =b-a;   end;   writeln(b)  end. (строчные\прописные без разницы)