Помощь - Поиск - Пользователи - Календарь
Полная версия: Решите кто-нибудь интересную задачу за лавандос! За ценой не постою!
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи > Задачи на заказ
Reza
После шторма

Во время шторма у яхты сломалась мачта. Яхтсмен решил плыть для ремонта на вёслах либо до морской трассы, либо до берега, в зависимости от того, что ближе. По рации он передал сообщение на берег о своих координатах и запросил подсказки о направлении движения и расстоянии до ближайшей точки ремонта. Море имеет форму круга с центром в начале координат. По берегу моря расположены несколько портов, попарно соединенных друг с другом морскими трассами (прямые линии).

Требуется разработать программу, которая указывает яхтсмену направление движения и расстояние до ближайшей точки ремонта.


Технические требования:
1. Исходные данные хранятся в файле INPUT3.TXT в следующем виде:
- первая строка – координаты яхты (x,y)-вещественные числа, разделённые пробелом;
- Вторая строка – количество морских портов (2<=N<=100);
- последующие N строк – координаты портов (x(i),y(i)), i=1,n – вещественные числа, заданные с точностью до 0.01 и разделённые пробелом (-100<=(x(i),y(i))<=100).

2. Результаты вычислений вывести на экран. Если яхта находится на трассе или у белега, вывести «оставаться на месте», иначе вывести:
- направление движения U – в градусах (0<=U<=360) с точностью до 0.1 (нулевой угол соответствует положительному направлению оси X, а угол 90 градусов – положительному направлению оси Y);

- расстояние до точки ремонта h - в морских милях – с точностью до 0.1.



Пример:

Input3.txt : Результаты:

-17 -17 U=225.0
3
-50 0 H=11.3
35.36 35.36
0 -50

Заранее благодарен.




Оплачу сразу
<...> заплачу примерно 15-20$

Нарушение правил форума (пункт 1.11 и 1.12 !!!) Ты что, на доску объявлений пришел? mad.gif
shajtan
Если тема еще актуальна, пиши...

сделаю за 15 зеленых
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.