Посчитайте количество букв, подходящих гласным звукам ("а", "я", ), в абзаце

Посчитайте количество букв, подходящих гласным звукам (quot;аquot;, quot;яquot;, ), в абзаце из книжки Л.Н. Толстого Война и мир. Молодая княгиня Болконская приехала с работой в шитом золотом бархатном мешке. Ее хорошенькая, с чуток черневшимися усиками верхняя губка была кратка по зубам, но тем милее она открывалась и тем еще милее вытягивалась время от времени и спускалась на нижнюю. Как это посещает у полностью привлекательных дам, недочет ее короткость губы и полуоткрытый рот казались ее особенною, фактически ее красой. Всем было забавно глядеть на эту полную здоровья и живости хорошенькую будущую мать, так просто переносившую свое положение. Старикам и тоскующим, неясным молодым людям казалось, что они сами делаются схожи на нее, побыв и поговорив несколько медли с ней. Кто сказал с ней и лицезрел при каждом слове ее светлую улыбочку и блестящие белые зубы, которые показывались постоянно, тот думал, что он неподражаемо ныне любезен. И это размышлял каждый.

Задать свой вопрос
1 ответ
// PascalABC . NET 3 . 0 , сборка 1088
begin
var s : = ReadLines ( 1 . txt ) . ToArray ;
var s 1 : = s [ 0 ] . ToString;
var s2 : string : = ;
for var i : = 1 to s1 . Length do s2 + = LowCase ( s1 [ i ] );
var s 3 : = s2 . W here ( x -gt; x in [ а , е , и , о , у , ы , э , ю , я ] );
var dic : = new Dictionarylt;char,integergt;;
foreach var c in s3 do dic [ c ] : = dic.Get ( c ) + 1;
dic.Print ( NewLine ) ;
end.

Итог выполнения программы (абзац в файле 1.txt)
( о , 81)
( а , 46 )
( я , 13 )
( и , 41 )
( е , 67 )
( у , 22 )
( ы , 18 )
( ю , 12 )
( э , 3 )
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт