Мысалдар:
Prolog тілінде қайтымды іздеу процессін басқаруға мүмкіндік беретін екі предикат бар: fail және cut (! Арқылы белгіленеді)
1-мысал:
Domains
Name = symbol
Predicates
Father(name, name)
Everybody
Clauses
Father (leo, katy).
Father (carl, jason)
Father(carl,mary).
Everybody:-
Father (X,Y),
Write(X,”is”,Y,”s fathers\n”),
Fail.
Goal
Everybody.
2-мысал. Қайтымды іздеу процессін үзу
Predicates
Byu_car(symbol,symbol)
Car (symbol,symbol, integer)
Colors(symbol, symbol)
Clauses
Byu_car (Model,Color):-
Car (Model, Color, Price),
Colors(Color, fun),!,
Price>25000.
Car (maserati, green, 25000).
Car (corvette, black, 24000).
Car (corvette, red, 26000).
Car (maserati, red, 24000).
Colors (red, fun).
Colors (black, mean).
Colors (green, preppy).
Goal
Byu_car(corvette, Y), write(Y).
Бақылау сұрақтары:
Қайтымды іздеу алгоритмін үзу дегеніміз не?
Қайтымды іздеу алгоритмін үзу дегеніміз не?
Термдер дегеніміз не?
Атомдар дегеніміз не?
Практикалық сабақ №4
Тақырыбы: Тізімдермен жұмыс
Сабақтың мақсаты: тізімдерге қолданылатын операцияларды және мәліметтерді өңдеу үшін файлдарды қолдануды оқып үйрену.
Материалдар және жабдықтар: ДК, Turbo Prolog программалау ортасы
Тапсырмалар:
Екі тізім берілген. Оларды біріктіру программасын құрыңдар
Тізім берілген. Тізімді екіге бөлу программасын құрыңдар
Тізім берілген. Тізім элементтерін өсу реті бойынша сұрыптау программасын құрыңдар
Тізім берілген. Тізім элементтерін кему реті бойынша сұрыптау программасын құрыңдар
Тізімдегі барлық теріс элементтерді алып тастайтын программа құр.
Тізімдегі ең болмағанда екі бірдей элемент бар екенін анықтайтын программа құр.
Бос тізімдегі алғашқы элементті оның соңына ауыстыратын программа құр
Жұмыстың мазмұны және орындалу тәртібі:
Вариант бойынша тапсырманы алу
Есептің қойылымы
Есепті шешу алгоритмі
Есепті шешу программасын Turbo Prolog программалау ортасында құру
Программа листингі
Орындалған жұмыс жөнінде есеп беру
Достарыңызбен бөлісу: |