|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
29.01.2008, 15:21 | #1 |
Регистрация: 29.01.2008
Сообщений: 3
|
Дана точка A с координ. X и Y, определить...
Дана точка A с координ. X и Y, определить ее положение относительно кольца с R=2 и r=1
|
29.01.2008, 16:29 | #2 |
Новичок
Джуниор
Регистрация: 18.01.2008
Сообщений: 1,720
|
А центр кольца не указан что ли? В общем виде? Или это кольцо на котором заданы сложение с умножением?
1. Определить, принадлежит ли точка А окружности с радиусом r (с помощью уравнения окружности, естественно, с учетом координат центра кольца). Если да, то точка в "дырке" кольца - не принадлежит, если нет, то: 2. Определить, принадлежит ли точка окружности с радиусом R (аналогично п. 1) Если да, то точка принадлежит кольцу, если нет - не принадлежит. |
29.01.2008, 16:52 | #3 |
Участник клуба
Регистрация: 02.09.2007
Сообщений: 1,193
|
Код:
|
29.01.2008, 23:10 | #4 |
Регистрация: 29.01.2008
Сообщений: 3
|
Написал вот (вся программа), за центр окружности - начало координат:
Uses Crt; var x,y,r1,r2:real; begin ClrScr; writeln('Введите координаты точки A'); readln(x,y); r1:=1; {внутренний радиус кольца} r2:=2; {внешний радиус кольца} if (x*x+y<=r2*r2) and (x*x+y*y>=r1*r1) then writeln ('Точка А принадлежит кольцу') else writeln ('Точка А не приандлежит кольцу'); readln; end. (можно и проще, так: с:=sqrt(x*x+y*y); if (с <= R) and (с >=r) then ... //точка в кольце ) Это все надо мне ввиде блок схем ( а я не помню уже как это все делается) |
29.01.2008, 23:48 | #5 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Вот набросал на скорую руку.
|
30.01.2008, 00:22 | #6 |
Регистрация: 29.01.2008
Сообщений: 3
|
ВСЕМ ОГРОМНОЕ СПАСИБО!!!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Среди 20 введёных чисел определить чётные, распечатать их, определить min | Spade | Помощь студентам | 4 | 15.06.2008 18:39 |
Дана задача---> | Programmistka6 | Общие вопросы Delphi | 6 | 24.05.2008 17:31 |
Определить попала ли точка в область? | Iogan Gamba Puti | Общие вопросы Delphi | 7 | 13.05.2008 00:15 |
Дана матрица размера M*N.Зеркально отразить ее элементы | Ильдар ХАЛИКОВ | Паскаль, Turbo Pascal, PascalABC.NET | 6 | 09.04.2008 22:22 |
Дана целочисленная квадратная матрица... | kitty | Помощь студентам | 1 | 05.12.2007 07:40 |