Se citesc doua numere naturale nenule a si b. Să se scrie un algoritm care afisiază CMMMC a celor doua numere.
Ajutor!!!!

#include <iostream>

using namespace std;

int main(){

// pentru a calcula CMMMC, folosim formula matematica:

//  [a,b] = a*b/(a,b) , unde

// [a,b] = cmmmc al lui a si b

// (a,b) = cmmdc al lui a si b

int a  ,b;

cin >> a >> b;

//vom calcula cmmdc pentru a, b, folosind algoritmul lui Euclid.

//ATENTIE: valorile lui a si b se modifica, deci le facem copii in p, q

int p = a, q = b;

//stim ca numerele sunt nenule

while(a%b)

{

 int r = a % b;

 a = b;

 b =r;

}

//rezultatul este ultimul impartitor, adica b.

//aplicam formula de mai sus

cout << p*q/b << endl;

return 0;

}

Pascal:

var M,N,cmmc: integer;

begin

readln(M,N);

cmmc:=m*n;

while M<>N do  

begin

if M>N then

M:=M-N  

else

N:=N-M

end;

writeln (cmmc div M)

end.