готов лаби 4 курс 1 сим / ЛП / Laboratornaya_robota_4

Тема: “ Методи організації повторів на мові програмування Turbo Prolog ”.

Мета: Розглянути різні способи організації повторів на мові програмування Turbo Prolog та застосування повторів для написання елементарних тестових програм.

Завдання:

1. Скласти власну програму-тренажер, що містить не менше п’яти фактів, з використанням ІІ і ІІІ методів повтору.

2. З’ясувати, як працює ця програма без ІІІ або без ІІ методів.

domains

i=integer

predicates

vopr1 r1 end_v1(i)

vopr2 end_v2(i)

vopr3 end_v3(i)

vopr4 end_v4(i)

vopr5 end_v5(i)

pres_ent

clauses

pres_ent:-write("Logi4eskoe programmirovanie\n"),

write("dlya zda4i 4 laboratornoy press ENTER\n\n\n"),r1,readchar(C),

write(C), char_int(C,13),!.

vopr1:- write("Vopros #1"), nl,

write("Kakaya seychas para?"), nl,

r1,readint(N), end_v1(N),!.

end_v1(X):-X=2, write("Verno").

r1.

r1:-r1.

vopr2:- nl,write("Vopros #2"), nl,

write("Kakaya segodnya lab.rab.?"), nl,

r1, readint(N), end_v2(N),!.

end_v2(X):-X=4, write ("Verno").

vopr3:- nl, write("Vopros #3"), nl,

write("Kakaya temperatura na ulice?"), nl,

r1, readint(N), end_v3(N),!.

end_v3(X):-X=3, write("Verno").

vopr4:- nl, write("Vopros #4"), nl,

write("Na kakom ti seychas etaje?"), nl,

r1, readint(N), end_v4(N).

end_v4(X):-X=5, write ("Verno").

vopr5:- nl, write("Vopros #5"), nl,

write("Skolko nujno sdat rabot?"), nl,

r1, readint(N), end_v5(N).

end_v5(X):-X=9, write ("Verno").

GOAL

pres_ent,

vopr1, vopr2, vopr3, vopr4, vopr5.

Контрольні питання:

1. Які ви знаєте методи організації повторів на мові Турбо Пролог?

2. Поясніть особливості роботи предикату fail?

3. Поясніть особливості роботи предикату „!”?

4. Як працює метод повтору, організований користувачем?

Міністерство освіти і науки України

Кіровоградський національний технічний університет

Механіко-технологічний факультет

Кафедра програмного забезпечення

Дисципліна: «Логічне програмування»

Лабораторна робота № 4

Тема: «Методи організації повторів на мові програмування

Turbo Prolog»

Виконав:

Ст. гр. ПМ-06

Буяков А.Ю.

Перевірив:

Викладач

Якименко Н.М.

Кіровоград – 2009