Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Центр помощи > [Delphi | Pascal] решения прямой геодезической

Автор: Nortos 17.11.2009, 20:18

Помогите срочно решить задачку до завтра оч срочно,ни как понять не могу как ее решить!! на Delphi или Pascal

:Написать программу для решения прямой геодезической задачи:по заданным координатам точки А(ХА,YА), горизонтальному положению(L в м) от точки А до точки В и дирекционному углу(альфа) этого проложения найти координаты точки В:
ХВ=ХА+Lcos альфа
YВ=YА+Lsin альфа.
Угол вводить в градусах,минутах и секундах,координаты,вводить с точностью до 1м.
В программе предусмотреть следующие запросы при вводе исходных данных:
ХА=;YА=

Прочитал как правильно написать тему вот!

Автор: Sanaff 17.11.2009, 22:03

Основные моменты кода:

Код


вводим:
alf_gr {градусы}
alf_min {минуты}
alf_s {секунды}
L {метры}

считаем

alf := 0.01745*(alf_gr + alf_min/60 + alf_s/3600);

XB: = XA + L*cos(alf);
YB: = YA + L*sin(alf);

Если надо программу полностью, обращайся [email protected]