На конференцию прибыли 36 ученых. каждый из них когда-то критиковал ровно одного из присутствующих на - id940662620210326 от 9872105 26.03.2021 10:51

Question

Информатика: На конференцию прибыли 36 ученых. каждый из них когда-то критиковал ровно одного из присутствующих на конференции. для решения одного важного вопроса было решено создать дружное жюри, в котором ни один ученый ни одного другого никогда не критиковал. какое наибольшее количество ученых можно избрать в это жюри независимо от того, кто кого критиковал?

9872105 · Accepted Answer

// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
var s:=ReadLnString('Вводите:');
s.ToWords.Where(x->x=ReverseString(x)).PrintLn;
end.

Тестовое решение:
Вводите: дед иван достал наган и пошел с ним в шалаш
дед наган и с в шалаш

Вариант, если исключить однобуквенные:

// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
var s:=ReadLnString('Вводите:');
s.ToWords.Where(x->x=ReverseString(x)).
Where(x->x.Length>1).PrintLn;
end.

Тестовое решение:
Вводите: дед иван достал наган и пошел с ним в шалаш
дед наган шалаш

MOGZ ответил