Определить n-ый символ строки - Prolog
Формулировка задачи:
Помогите решить задачу плз
Определить n-ый символ строки
Решение задачи: «Определить n-ый символ строки»
textual
Листинг программы
predicates
nth(string,integer,char)
clauses
nth("",_,_) :- fail.
nth(S,0,C) :- frontchar(S,C,_).
nth(S,L,C) :- L>0, L1=L-1, frontchar(S,_,R), nth(R,L1,C).