Выдать на экран сообщение попадает ли в круг площадью S с центром в начале координат точка с координатами х , у . Помогите пожалуйста , очень срочно нужно!!!
Выдать на экран сообщение попадает ли в круг площадью S с центром в начале координат точка с координатами х , у . Помогите пожалуйста , очень срочно нужно!!!
Ответ(ы) на вопрос:
Гость
var s,r,x,y:real;
begin
write('S = ');
readln(s);
write('x, y: ');
readln(x,y);
r:=s/pi;
if x*x+y*y<=r
then writeln('Точка попадет в круг')
else writeln('Точка не попадет в круг');
end.
Пример:
S = 58
x, y: 2 3
Точка попадет в круг
Не нашли ответ?
Похожие вопросы