Помогите с несложной програмкой

[Fantom]

Определите значение логического выражения, утверждающего, что точка с координатами x,y принадлежит окружности радиусом r. Центр окружности находится в точке a,b.

[Тролль]

Fantom:

Для таких вопросов предназначена тема Заказы "Сделайте все за меня".

Выражение: sqr(x-a)+sqr(y-b)=sqr( r)

P.S. Пробел перед r пришлось внести для правильного отображения движком форума.

Кстати, Пифагор, впервые придумавший это выражение, оценил его в сто быков, во всяком случае, именно столько он, по преданию, пожертвовал богам в качестве знака благодарности.

Изменено 6 января, 2008 пользователем Тролль

[Fantom]

Троль:

Я тут не сразу с орентировался. И создал новую тему с тем же вопросом.

А как ее реализовать в паскале.

Можеш написать програмку. Просто если я посмотрю ее ввиде программы то мне будет легче разобратся как она работает.

Я хочу понять как работает логический оператор. А то все как не доходит.

Вроде бы когда наченал было все понятно ну когда дошол до логического оператора теория вродебы понятна, а на практике реализовать немогу.Почему не знаю.

[Тролль]

Вот программа целиком:

var x,y,a,b,r:real;

begin

Write('x y a b r = ');ReadLn(x,y,a,b,r);WriteLn(sqr(x-a)+sqr(y-b)=sqr( r));ReadLn

end.

[Fantom]

Спосибо