Using `MapThread`: MapThread[Function[{x, y}, If[x > y, 1, 0]], {list1, list2}] (*{If[a > x, 1, 0], If[b > y, 1, 0], If[c > z, 1, 0]}*)