Текстовый файл содержит только заглавные буквы латинского алфавита (ABC…Z). Определите максимальную длину непрерывного фрагмента, который начинается и заканчивается одной и той же буквой из второй половины алфавита
Приведём решение на языке Python.
s = open('24.txt').readline()
maxi = 0
alf = ''.join(sorted('QWERTYUIOPASDFGHJKLZXCVBNM'))[13:]
for letter in alf:
maxi = max(maxi, len(max(s.split(letter)[1:-1], key=len) + letter*2))
print(maxi)
Ответ: 330.
Приведём решение Сергея Донец на PascalABC.NET:
begin
var s := ReadAllText('24_68286.txt').Where(c -> c in 'A'..'Z').JoinIntoString;
var last := new Dictionary var maxLen := 0; for var i := 1 to s.Length do if s[i] in 'N'..'Z' then begin if last.ContainsKey(s[i]) then maxLen := Max(maxLen, i - last[s[i]] + 1); last[s[i]] := i;end; writeln(maxLen); end.