Landathis
7 год назад
Вводится строка.Сколько в строке больших и маленьких латинских букв 'А'?Прошууу помогите....хотя бы скажите как делать я сделаю.Спасибо всем кто не пролистал...))Это в паскале
ОТВЕТЫ
Давидов
Jul 15, 2019
// PascalABC.NET 3.2, сборка 1356 от 04.12.2016
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString(gt;).ToCharArray;
Writeln(Найдено латинских "a": ,s.Where(x-gt;x in [a,A]).Count)
end.
Пример
gt; Once upon a time in America
Найдено латинских "a": 3
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString(gt;).ToCharArray;
Writeln(Найдено латинских "a": ,s.Where(x-gt;x in [a,A]).Count)
end.
Пример
gt; Once upon a time in America
Найдено латинских "a": 3
181
Смежные вопросы:
