Всего объем сообщения 3кб = 3072 байт = 24576 бит
На кодирования одного символа ушло 24576 : 6144 = 4 бит/символ
С помощью 4 бит можно закодировать < 2^4 символов
Ответ: Символов меньше 16.
var
s: string;
i: integer;
q: boolean;
begin
readln(s);
for i := 1 to length(s) do
if(s[i] = '?') then q := true;
if(q) then writeln('Вопросительное')
else writeln('Не вопросительное');
end.
Var n,k,i:integer;
y:longint;
begin
readln(n);
k:=1;
y:=1;
for i:=1 to n+1 do begin
y:=y*k;
k:=k+2;
end;
writeln(y);
end.