Then writeln('нет');
уберите в конце строки точку с запятой.
И поменяйте местами да - нет.
Сейчас у Вас "да" означает, что точка лежит вне окружности.
