Скачать Лабораторная работа на тему Разработка задач на Прологе, Лиспе бесплатно и без регистрации

Лабораторная работа Системы искусственного интеллекта Программирование, компьютеры и кибернетика Размещено: 17.04.2019

Изучение основных возможностей и базовых понятий языка Пролог и Лисп. Характеристика принципов построения программ на языке функционального и логического программирования. Реализация определенной структуры данных и рекурсивной программы вычисления.

Скачать работу Скачать уникальную работу

Чтобы скачать работу, Вы должны пройти проверку:

Аннотация к работе

АЛМАТИНСКИЙ УНИВЕРСИТЕТ ЭНЕРГЕТИКИ И СВЯЗИ Факультет: Информационные технологии Дисциплина: СИСТЕМЫ ИСКУССТВЕННОГО ИНТЕЛЛЕКТАИсходный код: DOMAINS. territory=ter(real, integer). population=pop(real, integer). info=c(string, territory, population, string). PREDICATES. country(info). show. search(string). search(integer, integer). CLAUSES. country(c("Australia", ter(7686.8, 6), pop(21585.1, 52), "Kanberra")). country(c("France", ter(674.8, 47), pop(64473.1, 20), "Paris")). country(c("India", ter(3287.6, 7), pop(1131191, 2), "New Delhi")). country(c("Hungary", ter(93.0, 109), pop(9930.9, 79), "Budapest")). country(c("Canadian", ter(9984.7, 2), pop(33091.2, 37), "Ottawa")). country(c("China", ter(9570, 3), pop(1322178.2, 1), "Pekin")). country(c("Russia", ter(17075.4, 1), pop(141887.5, 9), "Moskow")). country(c("USA", ter(9518.9, 4), pop(304000.0, 3), "Washington")). country(c("BREATBRITAIN", ter(244.8, 76), pop(60776.2, 21), "London")). country(c("Greece", ter(131.9, 94), pop(10964.0, 70), "Athenes")). country(c("Kazakhstan", ter(2724.9, 9), pop(15658.3, 61), "Astana")). country(c("Madagascar", ter(587.0, 45), pop(19448.8, 55), "Antananarivo")). country(c("Maldives", ter(0.3, 186), pop(298.9, 166), "Male")). country(c("Estonia", ter(45.0, 129), pop(1342.4, 151), "Tallinn")). country(c("Japan", ter(377.8, 60), pop(127433.5, 10), "Tokyo")). country(c("Czechia", ter(78.9, 114), pop(10403.1, 79), "Prague")). show: write ("******************************************************

"), nl, country(c(X, ter(At, Bt), pop(Ap, Bp), Y)), writef("%s\t\t%-1\t%u\t%-1\t%u\t%s

", X, At, Bt, Ap, Bp, Y), fail. search(X): country(c(Y, ter(_, _), pop(_, _), X)), writef("The %s is the capital of the %s.

", X, Y), fail; country(c(X, ter(At, Bt), pop(Ap, Bp), Y)), writef("The capital of %s is %s.\NTHE territory is %-1, zanimaet %u mesto v mire.\NTHE population is %-1, zanimaet %u mesto v mire.

", X, Y, At, Bt, Ap, Bp), fail. search(T, P): country(c(X, ter(_, Bt), pop(_, Bp), _)), Bt<=T, Bp<=P, writef(" %s, ", X), fail.

Вы можете ЗАГРУЗИТЬ и ПОВЫСИТЬ уникальность
своей работы

Разработка задач на Прологе, Лиспе - Лабораторная работа

Чтобы скачать работу, Вы должны пройти проверку:

Дисциплины научных работ