Var input:integer;
begin
write('Enter number - ');
readln(input);
case input of
1..9:writeln('Odnozhachnoe!');
else writeln('Error!');
end;
end.
1 мб=1024 кб
15*1024=15630 кб
затем пропорция:
15630 кб -2 мин
640. кб -х мин
х= 640*2/15630
х приблизительно равен 0.0818937 приблизительно равен 0.08 мин.
Но этот ответ не точный.
в алфавите 9+15*2=39 символа -> минимальное число бит на один символ: 6
9 Кбит = 9*1024 бит
на 1 пароль 9*1024/24=384 бит ~ 384/6=64 символа