Var
num: integer;
begin
readln(num);
writeln('Больше 10? ', num mod 10 + num div 100 + num div 10 mod 10 > 10);
end.
Забирай картинку, только фоткай лучше!
<span>1. B)
1;</span>
<span>2. B)
вопрос;</span>
3. С) трекант;
<span>
</span>
Объяснение:
^ знака нет, но выполняет свои действия, у себя в таблице ставьте его!
Нужно задать вопрос любому из них: "Если бы ты отвечал на вопрос:"За какой дверью дракон", что бы ты ответил?" Если спросили честного, он и ответит так, как бы ответил. Если спросили лжеца, то он соврет относительно своего ответа, т.е. в любом случае ответит правдиво. Как бы двойной фильтр, результат которого для лжи и правды одинаков.