Скачать: CL | DM;

Подсчет символов в текстовом файле   Найти похожие ветки 

← →
alex_pv2 ©   (2006-03-31 14:42) [0]

Всем доброго времени суток
возможно повторю чей нибудь вопрос.
Как можно лучше реализовать подсчет символов в текстовом файле, т.е.
такой-то символ встречается столько-то раз

---

← →
MBo ©   (2006-03-31 14:49) [1]

создать целочисленный массив, индексированный допустимыми символами, пробежать по символам всех строк, инкрементируя соотв. элемент массива.

например, для одной строки:

CharCounts: array[ #0..#255] of Integer;

FillChar(CharCounts, SizeOf(CharCounts),0);
for i:=1 to Length(s)
 Inc(CharCounts[s[i]]);

---

← →
alex_pv2 ©   (2006-03-31 15:14) [2]

мдя, со строкой получается преотлично
А вот до подсчета в файле расширить не хватает тяму

---

← →
Рамиль ©   (2006-03-31 15:19) [3]

А кто мешает весь текст в строку загрузить?

---

← →
MBo ©   (2006-03-31 15:21) [4]

>А вот до подсчета в файле расширить не хватает тяму
Ну уж цикл по строкам сам напиши

---

← →
alex_pv2 ©   (2006-03-31 15:22) [5]

убедили

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.042 c