Составьте программу нахождения наибольшего общего делителя трех чисел, используя следующую формулу:НОД(А, B, С) = НОД(НОД(A, В), С). Испоьзуя алгоритм Евклида

var     a, b, c: longint; function nod(a, b: longint): longint; begin     a := abs(a);     b := abs(b);     if a * b = 0 then nod := 1     else begin         while a <> b do             if a > b then                 a := a - b             else                 b := b - a;         nod := a;     end; end; begin     read(a, b, c);     writeln(nod(nod(a, b), c)); end.