ok = true; // 1<=i&&i<=n : $x$, n+1<=i&&i<=2*n : $!x$
forr(i, n) {
    if (scn[i] == scn[i+n]) ok = false;
    ans[i] = (scn[i] < scn[i+n]);
}