<h3>PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
ReadSeqInteger(3).Sorted.Skip(1).Take(1).Println
end.
<h2>28 10 15</h2><h2>15</h2>
Б- верный ответ. Мне нужно шото написать чтобы добавить ответ.
Программа на Кумире прилагается.
1000111110
+ 10111111
____________
1010111111