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

Question

Информатика

Макрина

18 января, 17:04

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

+1

Ответы (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.