Здраствуйие. Почему не работает следущий код? : p(X) :- X =:= 1, !. p(X) :- write(X), tab(1), p(X). То есть хочу вывести на экран все числа от 1 до X. Только начинаю изучать пролог, поэтому сильно не пинайте если глупость какую написал. Заранее спасибо.