Даны два натуральных числа. вычислите их наибольший общий делитель при алгоритма евклида, реализованного без использования рекурсии. входные данные вводится два натуральных числа. выходные данные выведите ответ на . примеры входные данные 12 14 выходные данные 2

// PascalABC.NET 3.2, сборка 1427 от 24.04.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a,b:integer;
  Read(a,b);
  while b<>0 do begin a:=a mod b; Swap(a,b) end;
  Writeln(a);
end.