Связанные списки - Помощь студентам

Лешка · 30.09.2010, 20:31

Удаление всех вхождений элементов Е в список L? например 12134 и т.д,на клавиатуре набираешь 1,а программа должна вывести сообщение сколько раз встречается единица.вот так вот! Задача на Pascal

rrrFer · 30.09.2010, 21:31

Код:

domains     
    element=integer
    list=element*
predicates
    count(list,element,integer)
clauses                      
    count([],_,0).
    count([H|T],H,C):-
        count(T,H,CC),
        C=CC+1.
    count([_|T],H,C):-  
        count(T,H,C).  
goal
    count([1,2,3,4,5,2,3,5,3,6,7],2,C),
    write(C).

На прологе, паскаль не помню ))

30.09.2010, 20:31	#1
Лешка Регистрация: 30.09.2010 Сообщений: 7	Связанные списки Удаление всех вхождений элементов Е в список L? например 12134 и т.д,на клавиатуре набираешь 1,а программа должна вывести сообщение сколько раз встречается единица.вот так вот! Задача на Pascal

30.09.2010, 21:31	#2
rrrFer Санитар Старожил Регистрация: 04.10.2008 Сообщений: 2,577	Код: `domains element=integer list=element* predicates count(list,element,integer) clauses count([],_,0). count([H\|T],H,C):- count(T,H,CC), C=CC+1. count([_\|T],H,C):- count(T,H,C). goal count([1,2,3,4,5,2,3,5,3,6,7],2,C), write(C).` На прологе, паскаль не помню )) Мой блог о программировании и проектировании

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Связанные списки в C++	Rembo	Общие вопросы C/C++	47	11.07.2016 12:45
Связанные списки с 3 списками	b_julia	Microsoft Office Excel	13	22.11.2010 15:57
связанные списки	Proger_1	Общие вопросы C/C++	1	28.05.2010 22:11
Связанные списки	Fezdipekla	Microsoft Office Access	3	02.04.2010 22:07
связанные списки и не только....	owl-ka	Microsoft Office Excel	1	11.02.2009 00:27