в алфавите 9+15*2=39 символа -> минимальное число бит на один символ: 6
9 Кбит = 9*1024 бит
на 1 пароль 9*1024/24=384 бит ~ 384/6=64 символа
Использовать Робот
алг
нач
нц пока не справа свободно
закрасить
вниз
кц
нц пока справа свободно
вниз
кц
нц пока не справа свободно и снизу свободно
закрасить
вниз
кц
нц пока не снизу свободно
закрасить
влево
кц
нц пока снизу свободно
влево
кц
нц пока не снизу свободно и слева свободно
закрасить
влево
кц
кон
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
Write('Ср.арифм:',ReadArrReal('>',15).Average)
end.
<u><em>Тестовое решение:</em></u>
> 4 3.7 2.8 1.45 4.15 2 2.47 1.18 3.41 3 2.09 2.0 3.31 2.4 1.94
Ср.арифм:2.66
//V = (100 -2*h)*(100 -2*h)*h
const L = 100;
var V1, V2,h :real;
begin
v1:= 0; v2:=1; h:=10;
while (v2 - v1) >0 do
begin
v1 := (100 - 2* h)* (100 - 2* h)*h;
h := h +0.5;
v2 := (100 - 2* h)* (100 - 2* h)*h;
writeln('Высота = ', h , ', Объем ', v1);
end;
writeln('Высота = ', h , ', Максимальный объем ', v1);
<span>end.</span>