$n=<>;
$s+=(0,1,$n)[$_]for glob<>;
$t+=(0,1,$n)[$_]for glob<>;
print$s>$t?$s:$t