Трудности с реализацией цикла - Prolog
Формулировка задачи:
Простая задача: написать рекурсивное правило, создающее строку, в которой каждый символ запоминает положительный (1) или отрицательный (0) ответ на заданный вопрос.
т.е. идея как в коде выше. естественно, что программисты так не делают, нужно все засунуть в цикл.
однако при реализации цикла у меня возникает проблема: если переменная была как output, то как input она потом уже не воспримется (мой предикат answer(i,i,o) ).
Решение задачи: «Трудности с реализацией цикла»
textual
Листинг программы
predicates quest(string) clauses quest(Line):-write("Question1"," "),readln(A),A<>"2",!,concat(A,Line,Bufline),quest(Bufline). quest(Line):-write("Stroka=",Line),nl. goal quest("").