Вводится строка.Сколько в строке больших и маленьких латинских букв 'А'?Прошууу...

Question

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

Answer 1

// 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

Comments

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