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

Подсчет количества цифровых символов в текстовом файле

17.12.2015, 20:16. Показов 1205. Ответов 0
Метки нет (Все метки)

Подсчет количества цифровых символов в текстовом файле.
Prolog
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
domains
    file=datafile
    list=string*
 
predicates
    nondeterm readFile(list)
    nondeterm stringWithNumber(list, integer, list, integer)
    nondeterm compareWithNumber(string, integer,integer)
    nondeterm result
 
clauses   
        readFile([]):- eof(datafile).
        readFile([H|T]):-not (eof(datafile)),
            readln(H),
            readFile(T).   
                
        stringWithNumber([],N,[],NN).
        stringWithNumber([H|T],N,[H|T1],NN):-
            compareWithNumber(H,N,NN),
            stringWithNumber(T,N,T1,NN).
        stringWithNumber([_|T],N,T1,NN):-
            stringWithNumber(T,N,T1,NN).
            
        compareWithNumber("",_,0):-
            fail.
        compareWithNumber(Str,N,N):-
            N=0,frontchar(Str,Sym,_),
            Sym >='0', Sym <='9',N=N+1.
        compareWithNumber(Str,N,N):-
            frontchar(Str,_,Str1),
            compareWithNumber(Str1,_,NN).
    
    result:-
        write("Enter file path and file name: "),
            readln(Filename),
            closefile(datafile),
        openread(datafile,Filename),
            readdevice(datafile),
            file_str(Filename,FileStr),
            readFile(Str),
            N=0,
            stringWithNumber(Str,N,StrWithNumber,NN),nl,
            write(NN),nl.
goal
    result.
вот мои наработки, но чего-то сильно негодует при попытке посчитать N. в этом вся проблема? буду благодарен за помощь.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.12.2015, 20:16
Ответы с готовыми решениями:

Подсчет количества определенных символов в строке. В чем ошибка?
Есть задание: Подсчитать число определенных символов в строке. Определил предикат char_count и...

Подсчет количества символов русского алфавита в текстовом файле
Здравствуйте, нужна ваша помощь) Допустим у нас имеется текстовой файл Test.txt( в нем находятся...

Подсчет количества слов длиной 5 символов в текстовом файле
Составить код, которая подсчитывает количество слов в текстовом файле длина которых равна числу 5 ...

Подсчет количества слов в текстовом файле
Подсчет количества слов в текстовом файле, содержащем целые числа и слова русского и английского...

0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.12.2015, 20:16
Помогаю со студенческими работами здесь

Подсчет количества абзацев в текстовом файле
здравствуйте!!помогите пожалуйста решить задачу!!мне дан текстовый файл,нужно посчитать в нем...

Подсчет количества предложений в текстовом файле
Сама задача:Подсчитать число предложений в заданном текстовом файле (текст на английском языке)....

Подсчет количества слов в текстовом файле
Добрый день! Помогите пожалуйста написать Батник: Подсчет количества слов в текстовом файле,...

Подсчет количества цифр в текстовом файле
написать программу,которая в текстовом файле,состоящем из строк не более 60 символов,находит...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru