Для кодирования одной из 7 нот требуется log(2)7 ≈ 3 бита (2^3=8).
Объем сообщения = 960*3 бит = 960*3 / 8 байт = 360 байт
<em>// PascalABC.NET 3.3, сборка 1579 от 18.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var (a,b):=ReadInteger2('Введите через пробел два натуральных числа:');
while b>0 do
(a,b):=(b, a mod b);
Writeln('НОД = ',a)
end.
Смашнюк Данило Русланович - 7 + 6 + 10 символов = 23 символа
23*8 = 184 бита