Помогите, Pascal ABC... Дано предложение. Если в этом предложении первая буква встречается более 3 раз, заменить её на восклицательный знак. Исходный текст задать самостоятельно таким образом, чтобы решалась задача.  

//PascalABC.NET 3.1 сборка 1239 begin     var s := ReadlnString('s =');     var c := s[1];          if s.ToLower().ToCharArray().Count(x -> x = c) >= 3 then begin         s := s.Replace(LowCase(c), '!');         s := s.Replace(UpCase(c), '!');     end;          writeln(s); end.