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

Лабораторная работа Системы искусственного интеллекта Программирование, компьютеры и кибернетика Размещено: 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.

Заказать написание новой работы

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

You searched for: {{term}}

Error! Please check the JS Console in your dev tools.

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