// PascalABC.NET 3.2, сборка 1344 от 22.11.2016 // Внимание! В других версиях работа не гарантируется! begin Writeln(ReadlnString('->').ToWords.Where(x->x[1] in ['а','А']).Count) end.
Пример -> Алла любила арбузы, а Аня предпочитала апельсины и ананасы 6
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
