Слова в тексте разделены пробелами. Какие символы есть в каждом слове?
Паскаль.

// PascalABC.NET 3.2, сборка 1325 от 19.10.2016begin  var s:=ReadlnString('Текст->').ToWords;  var c:=s[0].Intersect(s[1]);  for var i:=2 to s.Length-1 do c:=c.Intersect(s[i]);  Write('Символы, встречающиеся в каждом слове: ');  c.Println(',')end.ПримерТекст-> сегодня двенадцатое ноябряСимволы, встречающиеся в каждом слове: о,н