Дана строка. показать третий, шестой, девятый и так далее символы. решите на паскаль. заранее . : )

3-н
6-т
9-к
12-п
15-а
и так далее

Задание№ 1№ 2№ 3№ 4№ 5ответААГГАТестовое задание№ 6№ 7№ 8№ 9№ 10ответГВБГГ

ответы на открытие вопросы

ответ на вопрос 1:
Число перебора столь мало, что можно просто выписать всевозможные комбинации: ЗА, ЗД, ЗЧ, ДА, ДЗ, ДЧ, ЧА, ЧЗ, ЧД, АА, АЗ, АД, АЧ.
Всего

ответ на вопрос 2:
Тяжелая атлетика
Из первого условия тяжелоатлет не Сережа, из второго — не Коля, из третьего — не Петя. Значит, он — Вася.

ответ на вопрос 3:
Зашифрованы последовательно слова ноутбук, компьютер, модем, корова, мышь.
Лишнее слово — корова.

ответ на вопрос 4:
78
1+2+3+4+5+6+7+8+9+10+11+12=78.

ответ на вопрос 5:
Первым
Катя стоит до Лизы, до Феди, и, значит, до Ромы. То есть Катя стоит первой или второй. Поскольку она не первая, то – вторая, а остальные, кроме Андрея, за ней. Андрей – первы

1)constn=10;var i,k,min:integer; mas: array [1..n] of integer; begin  randomize;  for i:=1 to n do   mas[i]:=random(65);   min:=mas[1];   for i:=1 to n do    if mas[i] < min then    begin   min:=mas[i];   k:=i;   end;   for i:=1 to n do   write(mas[i]:4);   writeln();   writeln('minimalnoe=',min);   writeln('index=',k);   end.
2)constn=10;var i,k,min:integer; mas: array [1..n] of integer; begin  randomize;  for i:=1 to n do   mas[i]:=random(65);   for i:=1 to n do    write(mas[i]:4);  for i:=1 to n do    if mas[i] mod 3 = 0 then   mas[i]:=0;   writeln();   for i:=1 to n do    write(mas[i]:4);   end.