Var s : String;
Begin
s:='конкурс';
Writeln(s);
Writeln(s[6]+s[5]+s[3]+s[2]);
Writeln(copy(s,4,2)+s[7]+s[2]+s[1]);
end.
Begin
write ('1,2,3,4,5');
end.
begin
write ('2,4,6,8,10,12,14,16,18,20');
end.
begin
write ('15,17,19,21,23,25,27,29,31,33,35');
Первая буква 20, т.к. с 0 начинаться не может.
Тогда начинается бувы "Т"
Тогда
Ответ: Г, т.к. Тамара- единственное имя, которое начинается на "Т"