Мистер Фокс выдумывает себе пароль. Он желает, чтобы он состоял из

Мистер Фокс выдумывает для себя пароль. Он желает, чтоб он состоял из заглавных латинских букв и был довольно случайным, потому для его творения вымыслил таковой алгоритм. Поначалу он пишет на дощечке первую буковку латинского алфавита: A, затем стирает ее и пишет такое слово: BAA (поначалу 2-ая буковка латинского алфавита, позже два раза приписывает то, что стер с дощечки перед этим). Потом он опять все стирает. На третьем шаге мистер Фокс пишет третью буковку алфавита, а позже два раза повторяет то, что стер перед этим (вышла строчка CBAABAA) и так далее. Написав девятое слово, он останавливается и генерирует пароль: пароль состоит из записанных подряд букв девятой строки, стоящих на первом, 510, 5, 258 и 68 местах. Какой пароль вышел у мистера Фокса? Комментарий. Если бы в девятой строке на первом, 510, 5, 258 и 68 местах стояли бы буковкы A, B, C, D и E, то в качестве ответа необходимо было бы вывести строчку ABCDE.

Задать свой вопрос
1 ответ
Var
    s: string;
    c, i: integer;

begin
    c := ord('A') - 1;
    s := '';
    for i := 1 to 9 do
    begin
        s := Chr(c + i) + s + s;  
        writeln(i, ' - ', s);
    end;
    writeln('Password - ', s[1], s[510], s[5], s[258], s[68]);
end.

Вывод
1 - A
2 - BAA
3 - CBAABAA
4 - DCBAABAACBAABAA
5 - EDCBAABAACBAABAADCBAABAACBAABAA
6 - FEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAA
7 - GFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAAFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAA
8 - HGFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAAFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAAGFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAAFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAA
9 - IHGFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAAFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAAGFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAAFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAAHGFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAAFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAAGFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAAFEDCBAABAACBAABAADCBAABAACBAABAAEDCBAABAACBAABAADCBAABAACBAABAA
Password - IAEGE


, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт