Определить частоту, с которой встречается каждая из букв латинского алфавита

@kravchenko_A · Регистрация: 17.09.2013

Author24 — интернет-сервис помощи студентам

Составить программу, реализующую конкретную схему действий. В содержимое программы должна входить процедура формирования исходного файла нужного типа и формата.Для текстового файла Х1 определить частоту, с которой встречается каждая из букв латинского алфавита от 'A' до 'Z' и от 'a' до 'z', и эту таблицу частот записать в файл Х2.

@APALoff · 22.11.2013, 12:28

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Var
  m  : array[#0..#255] of Longint;
  i  : Char;
  j  : Byte;
  f  : Text;
  St : String;
Begin
  For i:=#0 to #255 do m[i]:=0;
  Assign(f,'input.inp');
  Reset(f);
  While not EOF(f) do
  Begin
    Readln(f,St);
    For j:=1 to Length(St) do Inc(m[St[j]]);
  End;
  Close(f);
  For i:=#0 to #255 do
    If (m[i]>0) and (((i>='A') and (i<='Z'))
     or ((i>='a') and (i<='z'))) then
      Writeln(i,' - ',m[i]);
End.

@kravchenko_A · 22.11.2013, 17:05 **[ТС]**

не могли бы вы пояснить что происходит в тех или иных действиях,пожалуйста?

Добавлено через 11 минут
и кстати она не работает,открывает пустое окно и ошибку и ставит зелёную стрелку в строку с resert(f)

@APALoff · 22.11.2013, 17:08

А файл input.inp создал?

И кстати она работает - т.к. этот код я не на память писал, а в оболочке TP и естесственно запускал для проверки.

@kravchenko_A · 22.11.2013, 17:11 **[ТС]**

Сообщение от APALoff

А файл input.inp создал?

а как подскажите пожалуйста?

@APALoff · 22.11.2013, 17:32

Сообщение от kravchenko_A

а как подскажите пожалуйста?

Есть замечательная серия книг, наподобии "Windows для чайников", там подробно описывается как правой кнопкой мыши создать документ-файл.

@kravchenko_A · 22.11.2013, 17:40 **[ТС]**

так дело то в том,что всё равно не работает. хотя файл создан

@APALoff · 22.11.2013, 17:47

Если файл создан и наполнен содержимым, то надо удостовериться, что Паскаль его ищет именно там где он лежит, а не в каких нибудь других каталогах. Либо через настройки самого TP, либо название файла указать вместе с путем размещения - и главное стараться избегать длинных путей, TP понимает названия не длиннее 8 символов.

@kravchenko_A · 22.11.2013, 17:51 **[ТС]**

ТР то что такое?

@APALoff · 22.11.2013, 17:59

Сообщение от kravchenko_A

ТР то что такое?

TurboPascal - это также и раздел, в который ты запостил задачу.

Новые блоги и статьи Все статьи Все блоги /
Анализ и линтинг кода JavaScript: ESLint, Prettier и JSHint run.dev 26.04.2025 JavaScript прошёл долгий путь от простого языка для анимации веб-страниц до основы современной веб-разработки. С ростом сложности приложений, увеличением кодовых баз и масштабированием команд. . .	Паттерны в Python: Singleton, Factory и Observer py-thonny 26.04.2025 Паттерны проектирования — это проверенные временем решения типовых проблем разработки программного обеспечения. Их история берёт начало с книги "Приёмы объектно-ориентированного проектирования. . . .	Исключения в C#: Stack Overflow, Access Violation и Out of memory stackOverflow 26.04.2025 Исключения в C# — это не только механизм оповещения о проблемах, а целое искусство управления потоком выполнения программы в экстремальных ситуациях. Обычное исключение, например,. . .	Логирование в C# ASP.NET Core с помощью Serilog, ElasticSearch, Kibana stackOverflow 25.04.2025 Помните те времена, когда для анализа проблемы приходилось подключаться к серверу, искать нужный лог-файл среди десятков других и вручную фильтровать тысячи строк в поисках ошибки? К счастью, эти дни. . .	Структура "железный OnKeyUp" вместо антидребезга. Полностью асинхронный счётчик. Hrethgir 25.04.2025 Программа для симуляции схемы - Logisim Evolution В общем какое-то время отвлёкся, так было надо, теперь когда запилю это на verilog и FPGA , досоставлю заявку в ФИПС на полезную модель - не готов. . .
Автоматизация Amazon Web Services (AWS) с Boto3 в Python py-thonny 25.04.2025 Облачные вычисления стали неотъемлемой частью современной ИТ-инфраструктуры, а Amazon Web Services (AWS) занимает лидирующие позиции среди провайдеров облачных услуг. Управление многочисленными. . .	Apache Kafka vs RabbitMQ в микросервисной архитектуре ArchitectMsa 25.04.2025 Современная разработка ПО всё чаще склоняется к микросервисной архитектуре — подходу, при котором приложение разбивается на множество небольших, автономных сервисов. В этой распределённой среде. . .	Параллельное программирование с OpenMP в C++ NullReferenced 24.04.2025 Параллельное программирование — подход к созданию программ, когда одна задача разбивается на несколько подзадач, которые могут выполняться одновременно. Оно стало необходимым навыком для. . .	Цепочки методов в C# с Fluent API UnmanagedCoder 24.04.2025 Современное программирование — это не только решение функциональных задач, но и создание кода, который удобно поддерживать, расширять и читать. Цепочки методов и Fluent-синтаксис в C# стали мощным. . .	Мульти-тенантные БД с PostgreSQL Row Security Codd 23.04.2025 Современные облачные сервисы и бизнес-приложения всё чаще обслуживают множество клиентов в рамках единой программной инфраструктуры. Эта архитектурная модель, известная как мульти-тенантность, стала. . .

@kravchenko_A 2 / 0 / 0 Регистрация: 17.09.2013 Сообщений: 84

	Определить частоту, с которой встречается каждая из букв латинского алфавита 21.11.2013, 23:11. Показов 1960. Ответов 9 Метки нет (Все метки) Составить программу, реализующую конкретную схему действий. В содержимое программы должна входить процедура формирования исходного файла нужного типа и формата.Для текстового файла Х1 определить частоту, с которой встречается каждая из букв латинского алфавита от 'A' до 'Z' и от 'a' до 'z', и эту таблицу частот записать в файл Х2. 0

@kravchenko_A 2 / 0 / 0 Регистрация: 17.09.2013 Сообщений: 84
	22.11.2013, 17:05 [ТС]
	не могли бы вы пояснить что происходит в тех или иных действиях,пожалуйста? Добавлено через 11 минут и кстати она не работает,открывает пустое окно и ошибку и ставит зелёную стрелку в строку с resert(f) 0

@APALoff 1647 / 1076 / 1081 Регистрация: 03.07.2013 Сообщений: 4,507
	22.11.2013, 17:08
	А файл input.inp создал? И кстати она работает - т.к. этот код я не на память писал, а в оболочке TP и естесственно запускал для проверки. 0

@kravchenko_A 2 / 0 / 0 Регистрация: 17.09.2013 Сообщений: 84
	22.11.2013, 17:40 [ТС]
	так дело то в том,что всё равно не работает. хотя файл создан 0

@APALoff 1647 / 1076 / 1081 Регистрация: 03.07.2013 Сообщений: 4,507
	22.11.2013, 17:47
	Если файл создан и наполнен содержимым, то надо удостовериться, что Паскаль его ищет именно там где он лежит, а не в каких нибудь других каталогах. Либо через настройки самого TP, либо название файла указать вместе с путем размещения - и главное стараться избегать длинных путей, TP понимает названия не длиннее 8 символов. 0

@kravchenko_A 2 / 0 / 0 Регистрация: 17.09.2013 Сообщений: 84
	22.11.2013, 17:51 [ТС]
	ТР то что такое? 0

Опции темы