Кол-во символов=65536, объем=24Кбайт
инф.объем одного символа=24*1024*8бит/65536=3 бита
мощность N=2³=8 символов в алфавите
Var x,i:integer;
begin
x:=5;
i:=1;
while (x<>3165) do begin
x:=x+4;
i:=i+1;
end;
writeln(i);
end.
Где русские буквы 8
где английские 14
Я могу ошибаться, но, по-моему, это 6,59ГБ. Удачи!;))))