Использование современной компьютерной техники и программного обеспечения для решения прикладных задач в области геодезических измерений

Writeln('Gorizontalnoe prolodgenie: ',S:6:3); {вывод горизонтального проложения на экран}

Writeln; {пропуск пустой строки}

Writeln(output,'Gorizontalnoe prokodgenie: ',S:6:3); {вывод горизонтального проложения в файл}

Writeln(output); {пропуск пустой строки в файле}

end;

writeln;writeln;writeln;writeln; {добавление личной подписи}

writeln(output);writeln(output);writeln(

output);writeln(output);

Writeln('Made by Moiseev Andrei, GG-09-2');

Writeln('All rights are reserved');

Writeln(output,'Made by Moiseev Andrei, GG-09-2');

Writeln(output,'All rights are reserved');

Close(input); {закрытие файла исходных значений}

Close(output); {закрытие файла полученных результатов}

Readkey; {добавление временной задержки}

end.{конец программы}

1.6 Результаты работы программы

А)

Priraschenie po abscisse: 658.660

Priraschenie po ordinate: -1657.870

Velichina rumba: 1.193

Rumb IV chetveri

291 gradusov 40 minut 3 secund

Gorizontalnoe prolodgenie: 1783.919

В)

Priraschenie po abscisse: -1571.650

Priraschenie po ordinate: -268.280

Velichina rumba: 0.169

Rumb III chetverti

189 gradusov 41 minut 13 secund

Gorizontalnoe prolodgenie: 1594.383

Рис.1.3 Результат работы программы

1.7. Проверка в MS Excel

Рис. 1.4 Excel-расчеты

Рис. 1.5 Проверка в MS Excel

Рис. 1.6 Проверка в MS Excel

Рис.1.7 Проведение промежуточных вычислений при проверке

1.8. Проверка в MathCad

Рис. 1.8 Расчеты в мат.пакете MathCad

1.9 Анализ результатов

Для решения поставленной задачи были использованы следующие приложения: математический пакет MathCad, табличный редактор MS Excel и язык программирования Turbo Pascal. Сравнивая полученные результаты, можно сделать вывод о правильности работы программы.

2. Прямая угловая засечка

2.1 Теоретические сведения

Прямая угловая (геодезическая) засечка - такое название носит способ определения координат точки местности Р , если на плоскости дана система точек геодезической сети с известными координатами и на этих точках измерены горизонтальные углы (рис.2.1.).

Р

Р

Рис. 2.1. Схемы прямой геодезической засечки.

Большое значение имеет величина угла при вершине треугольника – угла засечки , от которого во многом зависит точность определения координат. В инструкциях по проведению геодезической съемки указывается, что угол засечки не должен быть меньше 30о и больше 150о.

Для определения координат точки Р можно использовать формулы Юнга или формулы Гаусса. Чаще используются формулы Юнга, которые еще называют формулами котангенсов внутренних углов треугольника.

(2.1)

(2.2)

Широко используются и формулы Гаусса. В этом случае исходными данными являются не только координаты пунктов А1 и А2 и измеренные горизонтальные углы , но и вычисленный дирекционный угол стороны А1 А2.

(2.3)

(2.4)

Если пунктов геодезической сети более двух (рис.2.1б), то исходные данные являются избыточными, т.к. для определения искомых координат точки Р достаточно знать координаты и углы двух точек одного треугольника. Но в инструкции по выполнению геодезических работ требуют, чтобы координаты точки Р определялись как минимум из двух треугольников.

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

(2.5)

(2.6)

где XP k , YP k координаты, определенные из k-того треугольника.

2.2 Постановка задачи

Определить координаты точки P по трем точкам с известными координатами и 4 углам. (2 треугольникам)

2.3 Исходные данные

Табл. 2.2Исходные данные

2.5 Текст программы

Файл исходных данных

Пункт №1:

Координата X:

5951.77

Координата Y:

5440.33

Горизонтальный угол B1:

Градусы

94

Минуты

58

Секунды

38

-------------------------------

Пункт №2:

Координата X:

5648.54

Координата Y:

Страница:  1  2  3  4  5  6  7  8  9 


Другие рефераты на тему «Программирование, компьютеры и кибернетика»:

Поиск рефератов

Последние рефераты раздела

Copyright © 2010-2024 - www.refsru.com - рефераты, курсовые и дипломные работы