Определение предикатов fruit и print имеет вид:fruit(1, apple). fruit(2, pear). print() :- repeat(), fruit(N, X), write(X), nl, fruit(K, Y), write(Y), nl, N = K, !. print(). Сколько названий фруктов будет напечатано при вызове цели print()?

Правильный ответ:

• # Программа имеет вид: parent(bob, peter). parent(ann, bob). parent(peter, mary). Напишите значение, примет переменная X при вызове parent(ann, X)?
• # Напишите значение, которое примет переменная N в результате вызова цели N = string::search("prolog", "o") :
• # Определение предиката count имеет вид:count(L1, L2) = length(filter(L1, {(X):- isMember(X, L2)})). Какое значение примет переменная L в результате вызова цели L = count([1, 2, 3], [3, 2, 5])?
• # Определение предикатов male и parent имеет вид: male(tom). male(bob). parent(tom, mary). parent(tom, ann). Рассмотрим цели not(parent(X, _)), male(X) и male(X), not(parent(X, _)). Отметьте правильное утверждение:
• # Определение предиката reverse имеет вид:reverse([], L, L). reverse([A | L1], L2, L) :- reverse(L1, [A | L2], L). В результате вызова reverse([1, 2], [3, 4], L) переменная L примет значение