var
  a : array [1..5,1..5] of longint;
  j,i,sum,n : longint;
begin
  for i:=1 to 5 do
    for j:=1 to 5 do
      read(a[i,j]);
  readln(n);
  for i:=1 to 5 do
    sum:=sum+a[i,n];
  writeln(a[i,n]);
end.