Длиной не менее 2 и не более 4 символов можно закодировать последовательности из 2-х, 3-х и 4-х символов.
Определим количество каждого и сложим.
Каждый сигнал принимает одно из трёх значений.
2 символа - 3^2 = 9
3 символа - 3^3 = 27
4 символа - 3^4 = 81
9+27+81 = 117
Var
a, b: integer;
Begin
Writeln('Введите 2 числа');
Read(a,b);
if (a*b mod 3 = 0) then Writeln('Произведение чисел ', a, ' и ', b, ' делится нацело на 3')
else Writeln('Произведение чисел ', a, ' и ', b, ' нацело на 3 не делится');
end.
#010101 цвет..............
В первом ответ г)
во втором ответ б)
3072 / 1024 / 1,5 = 2 байта на символ. 16 битов, т. е. Итого: 2^16 = 65536 символов.