1, 2. Построение моделей с использованием инструментов рисования. Модель N 1
Модель N 2

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