[ главная ]   [ рейтинг статей ]   [ справочник радиолюбителя ]   [ новости мира ИТ ]



Ответов: 0
25-02-12 07:01







   Web - программирование
PHP


ASP






XML



CSS

SSI





   Программирование под ОС











   Web - технологии








   Базы Данных









   Графика






Данные




Программирование под ОС / Разное /

Prolog - Лабораторная работа, работа со списками 2.

Переписать из исходного целочисленного списка в результирующий, все положительные элементы кратные 5.

DOMAINS
SP=integer*
I=integer

PREDICATES
Cin(SP,I).
Pr1(SP,SP).

CLAUSES
Cin([],0).
Cin(S,K):-readint(Z),K1=K-1,Cin(S1,K1),S=[Z|S1].
Pr1([],[]).
Pr1([H|T],L1):-Pr1(T,List1),H>0,R=H mod 5,R=0,L1=[H|List1];Pr1(T,L1).

GOAL
Cin(S,8),Pr1(S,L1),write(L1).



Комментарии

 Ваш комментарий к данному материалу будет интересен нам и нашим читателям!



Последние статьи: Программирование под ОС / Разное /

Комментарии к небольшой серии статей о недокументированных возможностях MS-DOS
15-02-2010   

Описываемые возможности проникновения в DOS и недокументированное поведение функции 13h являются серьезной прорехой с точки зрения недопущения несанкционированных действий и в то же время лакомым кусочком для создателей вирусов... подробнее

Кол. просмотров: общее - 2887 сегодня - 1

Программирование портов ввода/вывода
17-01-2010   

Обычно ПК имеет как минимум 2 последовательных и 1 параллельный интерфейс. Они являются специальными устройствами и отображаются следующим образом... подробнее

Кол. просмотров: общее - 2966 сегодня - 0

Особенности языков программирования и файловый ввод-вывод
17-01-2010   

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

Кол. просмотров: общее - 3111 сегодня - 0

Prolog - Лабораторная работа, работа со списками 2.
14-12-2009   

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

Кол. просмотров: общее - 2971 сегодня - 0

Prolog - Вписать треугольник в окружность.
14-12-2009   
Кол. просмотров: общее - 3052 сегодня - 0



  WWW.COMPROG.RU - 2009-2012 | Designed and Powered by Zaipov Renat | Projects