<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var s:=ReadlnString;
var c:=s.ToWords.Where(t->t.Length>1).SelectMany(w->w.Pairwise)
.Select(t->t[0]+t[1]).GroupBy(t->t).Select(t->(t.Key,t.Count))
.OrderByDescending(t->t[1]).ThenByDescending(t->t[0]).First[0];
Writeln('Чаще других встречается цепочка "',c,'"')
end.
<u>Пример</u>
TWAS BRILLIG AND THE SLITHY TOVES DID GYRE AND GIMBLE IN THE WABE ALL MIMSY WERE THE BOROGOVES AND THE MOME RATHS OUTGRABE
Чаще других встречается цепочка "TH"
<u>Замечание:</u> ограничение на длину строки увеличено до 2 млн. символов.
1) 11 2)4 3)13 я не совсем уверена но вроде да
Дано
а=640
b=250
N=16
Найти V
V=a*b*I ( i- глубина цвета) I неизвестна, найдем из формулы Хартли
N=2^I 16=2^I 2^4=2^I i=4 бит
V=640*250*4=640000 бит , переводим в КБ
640000: 8:1024=78,125 Кб
Наличие источника и приемника информации и канала связи между ними