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

PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018Внимание! Если программа не работает, обновите версию!

function НОД(a, b: integer): integer;

begin

 while b > 0 do

   (a, b) := (b, a mod b);

 Result := a

end;

begin

 var (a, b, c) := ReadInteger3;

 НОД(НОД(a, b), c).Println

end.

78 294 5706 Замечание: числа должны быть неотрицательными