Python
Дано N чисел. Найти самое большое число, на которое делятся все N чисел.

var a,b,c,d,min,n,i,j: integer;

s: array [1..1000] of integer;

Begin

read(n);

for i:=1 to n do

read(s[i]);

min:=s[1];

for i:=2 to n do

begin

if min>s[i] then min:=s[i];

end;

for i:=min downto 1 do

begin

for j:=1 to n do

begin

if s[j] mod i<>0 then break;

if j=n then begin writeln(i); exit; end;

end;

end;

End.