Задание 2 ЕГЭ

Pascal abc.net:
###
uses school;
var x:=truetable((a,b,c,d) -> (a<=b) and (b=c) and (d<=a)); //условие после лямбды, значения a,b,c,d меняться не могут из-за функции.
truetableprint(x,1); ///1 - это результат, который нам нужен
------------------------------------------------------------------------------------------------------------------------
Python:
from itertools import *
print('x y z')
for x,y,z in product([0,1], repeat=3): #можно ещё добавлять в product строку
    f = (x or y)<=(z==x)
    if f==0:
        print(x,y,z)