Предмет: Информатика,
автор: marinamarkova1
⚠️⚠️⚠️Массив из 5 элементов.
Посчитать количество согласных и вывести.
PASCAL ⚠️
marinamarkova1:
Русские ,общее количество
Ответы
Автор ответа:
0
// 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
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrString('Вводите элементы массива построчно'+NewLine,5);
a.Select(t->t.ToLower.MatchValues('[аеёиоуыэюя]').Count).Sum.Println
end.
Пример
Вводите элементы массива построчно
Карл у Клары украл кораллы
А роза упала на лапу Азора
Это просто тест
Наша Маша громко плачет
А у нас нынче понедельник!
43
Похожие вопросы
Предмет: Русский язык,
автор: alshinbaeva02
Предмет: Алгебра,
автор: fazberfreddy467
Предмет: ОБЖ,
автор: vikaskibinskaa10
Предмет: Обществознание,
автор: mashaQqwerty