Определить номер элемента k в списке - Prolog
Формулировка задачи:
Есть код который определяет номер элемента в списке,
а как этот номер вывести на экран ???
Листинг программы
- domains
- list_char=char*
- predicates
- nondeterm indexof(char,integer,list_char)
- clauses
- indexof(A,1,[A|_]).
- indexof(_,-1,[]).
- indexof(A,D,[_|C]):- indexof(A,B,C), B > -1, D = B+1.
- indexof(A,D,[_|C]):- indexof(A,B,C), B = -1, D = B.
- goal
- indexof('.',X,['q','w','e','.','r','t','y']),!.
Решение задачи: «Определить номер элемента k в списке»
textual
Листинг программы
- goal
- indexof('.',X,['q','w','e','.','r','t','y']),
- !,
- write("Index: ", X), nl;
- write("Error in indexof"), nl.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д