uses crt;
const n=5; m=6;
var
   a:array [1..n,1..m] of integer;
   b:array [1..m] of integer;
   i,j,k,l:integer;
begin
clrscr; randomize;
for i:=1 to n do begin
    for j:=1 to m do begin
        read(a[i,j])
         end;
       writeln;
    end;

for k:=1 to m do
begin
    b[k]:=1;
    for l:=1 to n do
    if (a[l,k] mod 2 =0) and (a[l,k]>1) then b[k]:=b[k]*a[l,k];
end;

writeln;
for i:=1 to m do write (b[i]:5);
readln;
end.