Question

Se dau doua numere intregi citite de la tastatura
sa se realize algoritmul in pseudocod care calculeaza cel mai mare divizor comun al celor doua numere

Answer 1

Pascal
 
program CMMDC;
var  a, b, r: integer;
begin 
write('Primul numar: ');
  readln(a);
  write('Al doilea numar: ');
  readln(b);
  r := a mod b;
  while r <> 0 do   begin
    r := a mod b;
    a := b;
    b := r;
  end;
  writeln('CMMDC = ' + a);
end.