смотри : Берешь 5 литров ( заливаешь в большой баллон)
переливаешь в маленький становиться (дальше буду использовать операции долить, вылить перелить)
1. 3 / 2 (М/Б)
2. 0/2
3. 2/0
4. 2/5
5. 3/4
6. 0/4
7. 3/1 и вот в большом баллоне ровно 1 литр воды
<h3>PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
ReadSeqInteger('Вводите:', 15)
.Where(t -> t.InRange(1, 14)).Sum.Println
end.
1) 1-е поколение - б) Электронные лампы
2) 2-е поколение - г) Транзисторы
3) 3-е поколение - в) Микросхемы
4) 4-е поколение - а) БИС, СБИС