<span><span /><span><span>
A
B
C
F1
</span><span>
0
0
0
1
</span><span>
0
0
1
0
</span><span>
0
1
0
0
</span><span>
0
1
1
1
</span><span>
1
0
0
1
</span><span>
1
0
1
1
</span><span>
1
1
0
0
</span><span>
1
1
1
1
</span></span></span>
В ячейку B1 нужно ввести формулу =СУММ($A$1:A1) и эту формулу скопировать (распространить) на весь столбец B
У первых название двухкрылки,состав:крылья,усы,брюшко,лапки действия:летать,шевелить усами,охотиться.У вторых название двуххвостки состав: хвосты,усы,лапки,брюшко,крылья действия тоже самое что и у первых
<h3>PascalABC.NET 3.4.2, сборка 1847 от 28.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var n := ReadInteger;
if n.IsEven then n.ToString.ToCharArray.PrintLines
end.
<h2>518</h2><h2>5</h2><h2>1</h2><h2>8</h2>