расписать в паскале: На плоскости расположена окружность R в центре с началом координат. Определить положение точки X с координатами (A, B) относительно окружности (лежит ли точка внутри окружности на окружности или вне ее) Если можно полностью

Question

Информатика

Лукаша

16 сентября, 10:20

расписать в паскале: На плоскости расположена окружность R в центре с началом координат. Определить положение точки X с координатами (A, B) относительно окружности (лежит ли точка внутри окружности на окружности или вне ее) Если можно полностью

+5

Ответы (1)

Знаете ответ на вопрос?

Петрята · Answer 1

Program center;

var a, b, r:Integer;

begin

read (a, b, r) ;

if ((a*a+b*b) < r) then write ('Лежит') ;

if ((a*a+b*b) > r) then write ('Не лежит') ;

if ((a*a+b*b) = r) then write ('Лежит на окружности') ;

end.