Албания - Тирана;
Бельгия - Брюссель;
Венгрия - Будапешт;
Греция - Афины;
Лихтештейт - Вадуц.
Домены
Домен 1-го(2го,3-го...) уровня
F1=F1(A,B,C), т.е. функция трёх переменных.
Составим таблицу:
A+B=0 только если А=0 и В=0.
A*В=1 только если А=1 и В=1.
var
i1,i2,i3,i4,i5,i6:Longint;
begin
For i1:=0 to 9 do
For i2:=0 to 9 do
For i3:=0 to 9 do
For i4:=0 to 9 do
For i5:=0 to 9 do
For i6:=0 to 9 do
if i1+i2+i3=i4+i5+i6 then Writeln('счастливый билет':i1,i2,i3,i4,i5,i6);
Writeln('все миллионеры :D')
end.
Ответ: одна буква несет 5 бит информации.