Напишите код на питон для вычисления числа грэма ! ​

Const  n=3;   var a: array[1..n, 1..n] of integer;   i,j,s: integer;   begin  s: =0;   writeln('введите элементы матрицы');   for i: =1 to n do  for j: =1 to n do begin  read(a[i,j]);   if i< j then s: =s+a[i,j];   end;   writeln;   for i: =1 to n do begin  for j: =1 to n do write(a[i,j], ' ');   writeln;   end;   writeln('сумма всех элементов над главной диагональю = ',s);   end.

Var       i, min, n, d: integer; begin       readln(n);       min: =30000;             for i : = 1 to n do       begin               readln(d);               if (d mod 2 = 0) and (min> d) then                       min: =d       end;             writeln(min); end.