<span>8 единиц, займет 8 бит или 1 байт
</span>
// PascalABC.NET 3.1, сборка 1201 от 18.03.2016
begin
var a:=ReadInteger('Яблок было');
var d:=ReadInteger('Детей гуляло');
Writeln('Каждый получил яблок: ',a div d);
Writeln('На компот пошло яблок: ',a mod d)
end.
<u><em>Тестовое решение:</em></u>
Яблок было 37
Детей гуляло 7
Каждый получил яблок: 5
На компот пошло яблок: 2
1 символ - 4 бит
Письмо - 120 символов
V=120*4=480 бит(мульти)
1 символ - 5 бит
Письмо - 96 символов
V=96*5=480(пульти)
Объёмы одинаковые