A. 求河南理工大学大地测量学基础往年试题
今年的题和去年不一样,猜是猜不到的,不过最后有个100分的附加题,是高数方面的,把这个附加题做出来就行了。
B. 为什么说大地测量学是测绘学的基础
人们传统上把测量学分为两大类:测量学和大地测量学,测量学主要是研究范围不大的地球表面,可以近似看做平面不影响精度;而大地测量学是研究全地球或相当大的地球表面,此时铅垂线被认为彼此不平行,甚至要考虑到地球形状和重力场。 大地测量学的重要性体现在,首先,测绘学的主要任务是研究地球表面的几何形体的形状大小以及确定其空间点位,这是离不开大地测量学的;第二,许多基本概念都要有长期的大地测量的研究来定义,例如参考椭球面,大地水准面,高斯坐标系的定义;第三,普通测量学的研究范围很小,在半径为10KM的范围内或面积为100平方千米的范围内可以不考虑地球曲率和水准面曲率的影响,但是在实际的工作中,并不可能研究这么小范围的,因此就必须要涉及到大地测量学,才能做到准确和万无一失;第四,大地测量学在经济建设,防灾减灾,气象研究,空间科学,导弹卫星的精确定位以及国防建设各方面都都是必不可缺的,大地测量学适应的信息化战争的重要技术保障。 最后,我想说的就是,大地测量学是测绘学科各分支学科(包括工程测量,海洋测量,矿山测量,航空摄影测量等)的基础科学,大地测量学的基础理论,方法为测绘学的发展奠定了基础,提供了先决条件,大地测量的发展直接影响到测绘的发展。主要就是这些了,希望对你有帮助。
C. 大地测量学基础主要介绍了什么基础知识
全面地讨论了测绘基准与大地控制网、大地水准面与高程系统、参考椭球面与大地坐标系、高斯投影与高斯平面坐标系、大地坐标系的建立等测绘学的基本问题,介绍了与之相关的各类大地测量数据采集技术。
D. 《大地测量学基础》里面的高斯投影正反算公式及换带计算的VB或者C语言编程
我有VB的,自己很多年前写的,一直用,但是正算->反算->正算后,Y坐标与原来的差了0.5-0.7mm,不知道怎么回事,这两年工作忙也没有时间再深究,但是这样的计算精度做控制足够了,如果楼主或是者是哪位同仁见此贴能顺便把这个问题解决了,咱们就一起进步了!代码如下:
'高斯坐标正算
Private Sub DadiZs()
Dim t As Double, Itp As Double, X0 As Double, N As Double, L0 As Double
Dim V As Double, ll As Double, W As Double, M As Double
Lat = Radian(Lat)
Lon = Radian(Lon)
L0 = Radian(Lo)
If Tq = 0 Then
a = 6378245 '54椭球参数
b = 6356863.01877305
ep = 0.006693421622966
ep1 = 0.006738525414683
f = (a - b) / a
c = a ^ 2 / b
d = b ^ 2 / a
X0 = 111134.8611 * (Lat * 180# / Pi) - (32005.7799 * Sin(Lat) + 133.9238 * (Sin(Lat)) ^ 3 + 0.6973 * (Sin(Lat)) ^ 5 + 0.0039 * (Sin(Lat)) ^ 7) * Cos(Lat)
'X0 = 111134.8611 * (Lat * 180# / Pi) - (32005.7798 * Sin(Lat) + 133.9238 * (Sin(Lat)) ^ 3 + 0.6972 * (Sin(Lat)) ^ 5 + 0.0039 * (Sin(Lat)) ^ 7) * Cos(Lat)
Else
a = 6378140 '75椭球参数
b = 6356755.28815753
ep = 0.006694384999588
ep1 = 0.006739501819473
f = (a - b) / a
c = a ^ 2 / b
d = b ^ 2 / a
X0 = 111133.0047 * (Lat * 180 / Pi) - (32009.8575 * Sin(Lat) + 133.9602 * (Sin(Lat)) ^ 3 + 0.6976 * (Sin(Lat)) ^ 5 + 0.0039 * (Sin(Lat)) ^ 7) * Cos(Lat)
End If
ll = Lon - L0
t = Tan(Lat)
Itp = ep1 * Cos(Lat) ^ 2
W = Sqr(1 - ep * Sin(Lat) ^ 2)
V = Sqr(1 + ep1 * Cos(Lat) ^ 2)
M = c / V ^ 3
N = a / W
'x = X0 + N * t * (Cos(Lat)) ^ 2 * ll ^ 2 / 2 + N * t * (5 - t * t + 9 * Itp + 4 * Itp * Itp) * (Cos(Lat)) ^ 4 * ll ^ 4 / 24 + N * t * (61 - 58 * t ^ 2 + t ^ 4 + 270 * Itp - 330 * t ^ 2 * Itp) * (Cos(Lat)) ^ 6 * ll ^ 6 / 720 + N * t * (1385 - 3111 * t ^ 2 + 543 * t ^ 4 - t ^ 6) * Cos(Lat) ^ 8 * ll ^ 8 / 40320
x = X0 + N * t * (Cos(Lat)) ^ 2 * ll ^ 2 / 2 + N * t * (5 - t * t + 9 * Itp ^ 2 + 4 * Itp ^ 4) * (Cos(Lat)) ^ 4 * ll ^ 4 / 24 + N * t * (61 - 58 * t ^ 2 + t ^ 4 + 270 * Itp ^ 2 - 330 * t ^ 2 * Itp ^ 2) * (Cos(Lat)) ^ 6 * ll ^ 6 / 720 + N * t * (1385 - 3111 * t ^ 2 + 543 * t ^ 4 - t ^ 6) * Cos(Lat) ^ 8 * ll ^ 8 / 40320
y = N * Cos(Lat) * ll + N * (1 - t * t + Itp) * (Cos(Lat)) ^ 3 * ll ^ 3 / 6 + N * (5 - 18 * t * t + t ^ 4 + 14 * Itp - 58 * Itp * t * t) * (Cos(Lat)) ^ 5 * ll ^ 5 / 120 + N * (61 - 479 * t ^ 2 + 179 * t ^ 4 - t ^ 6) * Cos(Lat) ^ 7 * ll ^ 7 / 5040
r = Sin(Lat) * ll + Sin(Lat) * (Cos(Lat)) ^ 2 * ll ^ 3 * (1 + 3 * Itp + 2 * Itp ^ 2) / 3 + Sin(Lat) * (Cos(Lat)) ^ 4 * ll ^ 5 * (2 - t * t) / 15
r = Degree(r)
y = y + 500000#
End Sub
'高斯反算
Private Sub DadiFs()
Dim t As Double, Itp As Double, X0 As Double, Bf As Double, N As Double
Dim v As Double, ll As Double, W As Double, M As Double, L0 As Double
L0 = Radian(Lo)
X0 = x * 0.000001
y = y - 500000#
If Tq = 0 Then
a = 6378245 '54椭球参数
b = 6356863.01877305
ep = 0.006693421622966
ep1 = 0.006738525414683
f = (a - b) / a
c = a ^ 2 / b
d = b ^ 2 / a
If X0 < 3 Then
Bf = 9.04353301294 * X0 - 0.00000049604 * X0 ^ 2 - 0.00075310733 * X0 ^ 3 - 0.00000084307 * X0 ^ 4 - 0.00000426055 * X0 ^ 5 - 0.00000010148 * X0 ^ 6
ElseIf X0 < 6 Then
Bf = 27.11115372595 + 9.02468257083 * (X0 - 3) - 0.00579740442 * (X0 - 3) ^ 2 - 0.00043532572 * (X0 - 3) ^ 3 + 0.00004857285 * (X0 - 3) ^ 4 + 0.00000215727 * (X0 - 3) ^ 5 - 0.00000019399 * (X0 - 3) ^ 6
End If
Else
a = 6378140 '75椭球参数
b = 6356755.28815753
ep = 0.006694384999588
ep1 = 0.006739501819473
f = (a - b) / a
c = a ^ 2 / b
d = b ^ 2 / a
If X0 < 3 Then
Bf = 9.04369066313 * X0 - 0.00000049618 * X0 ^ 2 - 0.00075325505 * X0 ^ 3 - 0.0000008433 * X0 ^ 4 - 0.00000426157 * X0 ^ 5 - 0.0000001015 * X0 ^ 6
ElseIf X0 < 6 Then
Bf = 27.11162289465 + 9.02483657729 * (X0 - 3) - 0.00579850656 * (X0 - 3) ^ 2 - 0.00043540029 * (X0 - 3) ^ 3 + 0.00004858357 * (X0 - 3) ^ 4 + 0.00000215769 * (X0 - 3) ^ 5 - 0.00000019404 * (X0 - 3) ^ 6
End If
End If
Bf = Bf * Pi / 180#
t = Tan(Bf)
Itp = ep1 * Cos(Bf) ^ 2
W = Sqr(1 - ep * Sin(Bf) ^ 2)
v = Sqr(1 + ep1 * Cos(Bf) ^ 2)
M = c / v ^ 3
N = a / W
Lat = Bf - 0.5 * v ^ 2 * t * ((y / N) ^ 2 - (5 + 3 * t * t + Itp - 9 * Itp * t * t) * (y / N) ^ 4 / 12 + (61 + 90 * t * t + 45 * t ^ 4) * (y / N) ^ 6 / 360)
ll = ((y / N) - (1 + 2 * t * t + Itp) * (y / N) ^ 3 / 6 + (5 + 28 * t * t + 24 * t ^ 4 + 6 * Itp + 8 * Itp * t * t) * (y / N) ^ 5 / 120) / Cos(Bf)
r = y * t / N - y ^ 3 * t * (1 + t * t - Itp) / (3 * N ^ 3) + y ^ 5 * t * (2 + 5 * t * t + 3 * t ^ 4) / (15 * N ^ 5)
Lat = Degree(Lat)
Lon = Degree(L0 + ll)
r = Degree(r)
End Sub
有了正反算,换带也就完成了!
用到的子程序:
Public Const Pi = 3.14159265358979, p = 206264.806
Public Cktq As String
'角度化弧度
Public Function Radian(a As Double) As Double
Dim Ro As Double
Dim c As Double
Dim Fs As Double
Dim Ib As Integer
Dim Ic As Integer
If a < 0 Then a = -a: t = 1
Ro = Pi / 180#
Ib = Int(a)
c = (a - Ib) * 100#
Ic = Int(c + 0.000000000001)
Fs = (c - Ic) * 100#
If t = 1 Then Radian = -(Ib + Ic / 60# + Fs / 3600#) * Ro Else Radian = (Ib + Ic / 60# + Fs / 3600#) * Ro
End Function
'弧度化角度
Public Function Degree(a As Double) As Double
Dim Bo As Double
Dim Fs As Double
Dim Im As Integer
Dim Id As Integer
If a < 0 Then a = -a: t = 1
Bo = a
Call DMS(Bo, Id, Im, Fs)
If t = 1 Then Degree = -(Id + Im / 100# + Fs / 10000#) Else Degree = Id + Im / 100# + Fs / 10000#
End Function
Public Sub DMS(a As Double, Id As Integer, Im As Integer, Fs As Double)
Dim Bo As Double
Dim c As Double
c = a
c = 180# / Pi * c
Id = Int(c)
Bo = (c - Id) * 60
Im = Int(Bo)
Fs = (Bo - Im) * 60
End Sub
'取位计算
Public Function Qw(a As Double, Ws As Integer) As Double
Qw = Int(a * 10 ^ Ws + 0.5) / 10 ^ Ws
End Function
E. 为什么大地测量学是测绘学的基础
人们传统上把测量学分为两大类:测量学和大地测量学,测量学主要是研究范围不大的地球表面,可以近似看做平面不影响精度;而大地测量学是研究全地球或相当大的地球表面,此时铅垂线被认为彼此不平行,甚至要考虑到地球形状和重力场。
大地测量学的重要性体现在,
首先,测绘学的主要任务是研究地球表面的几何形体的形状大小以及确定其空间点位,这是离不开大地测量学的;
第二,许多基本概念都要有长期的大地测量的研究来定义,例如参考椭球面,大地水准面,高斯坐标系的定义;
第三,普通测量学的研究范围很小,在半径为10KM的范围内或面积为100平方千米的范围内可以不考虑地球曲率和水准面曲率的影响,但是在实际的工作中,并不可能研究这么小范围的,因此就必须要涉及到大地测量学,才能做到准确和万无一失;
第四,大地测量学在经济建设,防灾减灾,气象研究,空间科学,导弹卫星的精确定位以及国防建设各方面都都是必不可缺的,大地测量学适应的信息化战争的重要技术保障。 最后,我想说的就是,大地测量学是测绘学科各分支学科(包括工程测量,海洋测量,矿山测量,航空摄影测量等)的基础科学,大地测量学的基础理论,方法为测绘学的发展奠定了基础,提供了先决条件,大地测量的发展直接影响到测绘的发展。
F. 你好,武测今年考生,大地测量学,《大地测量学基础》那本书感觉看的差不多了,我应该再复习些什么谢谢
童鞋,一定要把所有可能的考点都弄得清清楚楚
该记的知识点记牢了,务必要反复的记,反复的背
虽然大地考的不难,但要想考高分是很难的。
不能有丝毫的侥幸,不然复试的时候后悔就晚了
生命在于背诵,哈哈
G. 测量学与建筑工程测量概述
一、测量学的任务及其作用
测量学是研究地球的形状和大小以及确定地面点位的科学。它的内容包括两部分,即测定和测设。测定是指使用测量仪器和工具,通过测量和计算,得到一系列测量数据或成果,将地球表面的地形缩绘成地形图,供经济建设、国防建设、规划设计及科学研究使用。测设(放样)是指用一定的测量方法和精度,把设计图纸上规划设计好的建(构)筑物的平面位置和高程标定在实地上,作为施工的依据。
测量学包括大地测量学、普通测量学、摄影测量学、海洋测量学、工程测量学及地图制图学等分支。本教材主要介绍普通测量学及部分建筑工程测量的内容,以便能应用所学的建筑工程测量知识为其专业工作服务。
测量学是一门历史悠久的科学,早在几千年前,由于当时社会生产发展的需要,中国、埃及、希腊等国家的劳动人民就开始创造与运用测量工具进行测量。我国在古代就发明了指南针、浑天仪等测量仪器,为天文、航海及测绘地图作出了重要的贡献。随着人类社会需求和近代科学技术的发展,测绘技术已由常规的大地测量发展到空间卫星大地测量,由航空摄影测量发展到航天遥感技术的应用;测量对象由地球表面扩展到空间星球,由静态发展到动态;测量仪器已广泛趋向精密化、电子化和自动化。新中国成立50多年来,我国测绘事业得到了蓬勃发展,在天文大地测量、人造卫星大地测量、航空摄影与遥感、精密工程测量、近代平差计算、测量仪器研制及测绘人才培养等方面,都取得了令人鼓舞的成就。我国的测绘科学技术已居世界先进行列。
测量技术是了解自然、改造自然的重要手段,也是国民经济建设中一项基础性、前期和超前期的工作,应用广泛。它能为城镇规划、市政工程、土地与房地产开发、农业、防灾、科研等方面提供各种比例尺的现状地形图或专用图和测绘资料;同时按照规划设计部门的要求,进行道路规划定线和拨地测量,以及市政工程、工业与民用建筑工程等建筑工程的勘察测量,直接为建设工程项目的设计与施工服务。在工程施工过程和运营管理阶段,对高层、大型建(构)筑物进行沉降、位移、倾斜等变形观测,以确保建(构)筑物的安全,并为建(构)筑物结构和地基基础的研究提供各种可靠的测量数据。所以,测量工作将直接关系到工程的质量和预期效益的实现,是我国现代化建设不可缺少的一项重要工作。随着测绘科技的发展以及新技术的研究开发与应用,必将为各个行业及时提供更多更好的信息服务与准确的、适用的测绘成果。
二、建筑工程测量的任务及其作用
建筑工程测量是研究工业与民用建筑的勘察、设计、施工和管理等阶段中所需进行的各种测量工作。它的任务是:
1)利用各种测量仪器和工具测定地面点的相互位置,将地面的形状和大小按一定比例尺绘制成地形图等供规划设计之用。
2)将拟建建筑物的位置和大小按设计图纸的要求测设在地面上以便施工,这种工作通常称为测设,又称施工放样或放线。
3)竣工以后,为工程验收、扩建和改建提供可靠资料,需要进行竣工测量。有时为了鉴定建筑物的工程质量及监护建筑物的运营,或为建筑结构及地基基础科学研究提供资料,还要在施工过程和使用管理各阶段中对这些建筑物进行沉降、位移和倾斜等变形观测。
如上所述,测量工作实际上贯穿于建筑工程的全过程,其质量直接关系着工程建设的速度和质量。随着我国现代化建设事业的蓬勃发展,工程建设的速度和复杂程度越来越高,因而测量工作的精度和速度也要相应地不断提高。