Написать программу на Pascal, попадает ли точка с заданными координатами в область?
10-11 класс
|
program task2;
var R, x, y : real;
begin
writeln('Введите значения R, x, y:');
read(R, x, y);
if (((x >= 0) and (y >= 0) and (x * x + y * y <= R * R)) or ((x < 0) and (y < 0) and (y >= -x - R))) then
writeln('Точка с координатами x: ', x, ', y: ', y, ' принадлежит заданной области.')
else
writeln('Точка с координатами x: ', x, ', y: ', y, ' не принадлежит заданной области.');
end.
Другие вопросы из категории
помогите пожалуйста в паскале.
Ввести с клавиатуры массив из 5 элементов, найти минимальный из них.
дробь представлять двумя целыми числами: первое число представляет числитель дроби, а второе - знаменатель. В процессе вычислений требуется сокращать дроби на их наибольший общий делитель (НОД). Если одно из чисел равно нулю, то НОД берем равным 1. Разработать также отдельные процедуры для ввода (на экран выводится надпись: «Введите числитель и знаменатель обыкновенной дроби») и вывода обыкновенных дробей (a/b).
Читайте также
Буду очень благодарен, если решите эту задачу!
определить попадает ли точка A(x,y) внутрь треугольника, углы которого заданы координатами (0,2), (-2,0), (2,0)
которая выдает одно из сообщений «Да», «Нет», «На границе» в зависимости от
того, лежит ли точка внутри заштрихованной области, вне заштрихованной области
или на ее границе.