Вот вам ответ на 1 кроссворд
===== PascalABC.NET =====
begin
ReadSeqInteger('Введите 12 чисел', 12)
.Count(p -> p.InRange(-9, 9)).Println
end.
If b then
if c then x:=True else x:=a
else x:=a;
7 ответ 2 система упорядочивает файлы по имени
Ответ:
30 различных команд можно передать с помощью 5 лампочек
Объяснение:
(10) 30 => (2) 11110