16 = 2 ^ 4 степени, следовательно, для хранения одного символа данного алфавита нужно 4 бита. 3 кбайт = 3072 байт.
Т. к. 1 байт = 8 битам, значит 3072 * 2 = 6144 - общее число символов в сообщении.
<em>// PascalABC.NET 3.2, сборка 1387 от 17.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
randomize;
var s:=Random(100,999).ToString;
Writeln('Исходное число ',s);
var k4:=0;
var k5:=0;
for var i:=1 to s.Length do
case s[i] of
'4':k4+=1;
'5':k5+=1
end;
Writeln('Четверок в числе- ',k4,', пятерок- ',k5)
end.
<em><u>Пример</u></em>
Исходное число 954
Четверок в числе- 1, пятерок- 1
M-число строк
n-количество переменных
m=2^n
m=2^9=512
Hex(8): 4 = Dec(10)
Hex: 1,2,3,4,5,6,7,10,11,12...
Dec: 1,2,3,4,5,6,7, 8, 9, 10...
<span>АНКЛАН, в переводе с чукотского - это просто "люди", а пасти оленей в тундру - чауча "люди, у которых есть олени" (отсюда и пошло название чукча) .</span>