0 / 0 / 0
Регистрация: 14.04.2020
Сообщений: 79
1

Для фрагмента текста определить количество букв "А", "В", "U", что входят в каждую строку

01.10.2020, 00:14. Показов 1082. Ответов 7
Метки нет (Все метки)

Прочитать текст из файла.
Для фрагмента текста определить количество букв "А", "В", "U", что
входят в каждую строку. Вывести на печать ту строку, в котором этих
букв больше.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.10.2020, 00:14
Ответы с готовыми решениями:

Определить, что в введенной строке букв "а" больше, чем "б"
Задание : Составить программу, организующую работу с пользователем в диалоговом режиме: программа...

В строке каждую группу подряд идущих букв "к" необходимо заменить на одну букву "к"
Дана строка t, напишите алгоритм получения новой строки,в которой каждую группу подряд идущих букв...

Заменить в строке "." на ";", "." на ".", убрать лишние пробелы. Не могу доделать один кусочек
Не соображу, как уместить два действия так, чтобы работали оба, а именно, исходные "." заменить на...

Составьте программу замены в слове Х всех букв "а" и "я" на слог "по"
Составьте программу замены в слове Х всех букв "а" и "я" на слог "по". заранее спасибо!

7
4611 / 2308 / 2205
Регистрация: 10.12.2014
Сообщений: 8,839
01.10.2020, 04:22 2
Лучший ответ Сообщение было отмечено Vitaliy01 как решение

Решение

Pascal
1
2
##
ReadAllLines(ReadLnString('имя файла:')).Select(x->(x, x.toUpper.Count(c->'ABU'.Contains(c)))).MaxBy(x->x[1])[0].Println;
0
0 / 0 / 0
Регистрация: 14.04.2020
Сообщений: 79
01.10.2020, 20:40  [ТС] 3
код не работает!
0
4611 / 2308 / 2205
Регистрация: 10.12.2014
Сообщений: 8,839
02.10.2020, 04:01 4
Я никогда не выкладываю код, предварительно не протестировав его.
Цитата Сообщение от Vitaliy01 Посмотреть сообщение
код не работает!
Это голословное заявление!
Где не работает?
На что ругается?
0
1672 / 979 / 402
Регистрация: 07.04.2017
Сообщений: 3,825
02.10.2020, 09:57 5
ТС сделал дубль и продолжил в нём Для фрагмента текста вычислить количество букв "А", "О", "U", что входят в каждую строку
0
0 / 0 / 0
Регистрация: 14.04.2020
Сообщений: 79
02.10.2020, 19:34  [ТС] 6
Если не сложно обьясните пожайлуста как програма должна правильно работать, где подкючать файл, зарание спасибо.
Паскаль обновил теперь все запускаетса, но не могу понять куда подключать файл, что бы програма работала корректно
0
1672 / 979 / 402
Регистрация: 07.04.2017
Сообщений: 3,825
02.10.2020, 19:44 7
Его надо не подключать, а положить в папку где лежит .exe файл, который вы запускаете.
Если отключить настройку "Выходные файлы генерировать в папку" - то .exe будет в той же папке что и .pas файл.
0
0 / 0 / 0
Регистрация: 14.04.2020
Сообщений: 79
02.10.2020, 20:35  [ТС] 8
Окей, вроде понял, спасибо за помощь)
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.10.2020, 20:35

В чем ошибка? Когда печатаю "а" или "б" все работает, а когда "А" или "Б" то он не меняет "А" на "Б"
{Программа заменяет буквы "а" на буквы "б" в введенном тексте} var stroka : string; i :...

Узнать количество букв "А", и наличие буквы "С" в строке
Дана последовательность символов х1,х2..хn Узнать кол-во букв "А" ,и есть ли буква "С" если её нет...

Заменить в строке "Мама мыла раму" буквы "а" на знак "_" . Вывести полученный массив на экран
Заменить в строке "Мама мыла раму" буквы "а" на знак "_" . Вывести полученный массив на экран....

Как скрыть в graphABC кнопки "свернуть", "Развернуть", "Закрыть"
Как скрыть в graphABC кнопки "свернуть", "Развернуть", "Закрыть"

Как перевести числа с "String" в "integer" или "Real"?
как перевести числа с "String" в "integer" или "Real"?

Удалить из последовательности символов S все слова, оканчивающиеся группой букв, "кая" или "кое"
Даны натуральное число n, символы S1,... Sn. Будем рассматривать слова, образованные символами, ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.