var
x, y, R, Oa, Ob: real;
begin
writeln('Введите радиус окружности R');
readln(R);
writeln('Введите координаты центра окружности');
readln(Oa, Ob);
writeln('Введите координаты точки');
readln(x, y);
if (x > (Oa - R)) and (x < (Oa + R)) and (y > (Ob - R)) and (y < (Ob + R)) then
writeln('Точка с заданными координатами лежит внутри круга')
else
writeln('Точка с заданными координатами лежит вне круга');
end.
Если все правильно, отметь решение как лучшее)
Це предмет на який направлена певна дiяльнiсть
Подсистема - колесо, рама , спицы, и т.д.
<span>Надсистема - дорога, гараж, улица, мир....</span>
Растр_______________________________
1.
а)винчестеp
б)постоянная память
г)<span>опеpативная память</span>