Вводится строка.Сколько в строке больших и маленьких латинских букв 'А'?Прошууу помогите....хотя бы скажите как делать я сделаю.Спасибо всем кто не пролистал...))Это в паскале

спасибо огромное))

Пожалуйста!

// PascalABC.NET 3.2, сборка 1356 от 04.12.2016// Внимание! Если программа не работает, обновите версию!begin  var s:=ReadlnString('>').ToCharArray;  Writeln('Найдено латинских "a": ',s.Where(x->x in ['a','A']).Count)end.Пример> Once upon a time in AmericaНайдено латинских "a": 3