420Кбайт/24разряда =1разряд 17,5Кбайт
256разрядов *17,5Кбайт =4480Кбайт
Но это может быть не очень точно.
Ноль,девять,векнор,Вить,Ева,Лент,Дина,модуля, ноль.
Var m,mk,k:integer;
begin
readln(m);
k:=0;
mk:=1;
while mk<m do
begin
mk:=mk*4;
k:=k+1;
end;
k:=k-1;
writeln(k);
end.
Пример:
500
4
Люди не всегда используют чужие суждения, многие хотят выдвинуть свою гипотезу и ищут доказательства, наблюдая, проводя опыты и т.д.
высоконького легонького долгонького
молочная сочная булочная
ночники виноградники
яблонька веселенького цветного