Компьютер выполняет перебор со скоростью 10 млн. паролей в секунду. Определите, какова должна быть минимальная длина пароля, чтобы время его взлома (перебора всевозможных вариантов пароля) составило не менее 1 месяца (31 день), если пароль состоит только из цифр.
Подсказка: N = Mi

var a,b: string; begin                            cls;   read(a);     b: =a;           write('b')end.           

я думаю что основанием будет число 7 

проверка: 7^2*1+7^1*2+7^0*2= 49+14+2=65

в блок схемах не сильна

var n: integer;

s,s0: real;

begin

  n: =1;

  s: =10;

  repeat

      n: =n+1;

      s: = s + (100+p)*s0/100;

      s0: =(100+p)*s0/100;

  until s> 200;

  writeln(s);

end.