Question

⚠️⚠️⚠️Массив из 5 элементов.
Посчитать количество согласных и вывести.
PASCAL ⚠️

Answer 1

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadArrString('Вводите элементы массива построчно'+NewLine,5);
  a.Select(t->t.ToLower.MatchValues('[аеёиоуыэюя]').Count).Sum.Println
end.

Пример
Вводите элементы массива построчно
 Карл у Клары украл кораллы
А роза упала на лапу Азора
Это просто тест
Наша Маша громко плачет
А у нас нынче понедельник!
43