Prolog: Попадает ли точка в круг
Формулировка задачи:
Доброго времени суток, уважаемые коллеги! Написал на ПРОЛОГЕ программу, которая определяет попала ли точка с координатами в круг. Программа выводит верно если точка в круге, а если нет, то всё равно выводит "Попадает", а точка не в круге.
Привожу код, подскажите пожалуйста в чём дело.
Решение задачи: «Prolog: Попадает ли точка в круг»
textual
Листинг программы
proverka(X,Y,Xc,Yc,R):- sqrt((X-Xc)*(X-Xc) + (Y-Yc)*(Y-Yc))<=R*R, write("Popadaet"). proverka(_,_,_,_,_):-write("Ne popadaet").