用vb编程已知平面坐标系中两点的坐标,求两点的距离
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/16 07:14:13
用vb编程已知平面坐标系中两点的坐标,求两点的距离
Const e As Double = 0.000001
Sub jisuan(x1 As Long,y1 As Long,x2 As Long,y2 As Long)
c1 = Val(Str(x2 - x1))
c2 = Val(Str(y2 - y1))
Dim x As Double
x = c1 * c1 + c2 * c2
Dim d1 As Double,d2 As Double
d1 = x / 2
d2 = (d1 + x / d1) / 2
Do While d1 - d2 >= e Or d1 - d2
Sub jisuan(x1 As Long,y1 As Long,x2 As Long,y2 As Long)
c1 = Val(Str(x2 - x1))
c2 = Val(Str(y2 - y1))
Dim x As Double
x = c1 * c1 + c2 * c2
Dim d1 As Double,d2 As Double
d1 = x / 2
d2 = (d1 + x / d1) / 2
Do While d1 - d2 >= e Or d1 - d2
求VB 基础操作 已知平面坐标系内两点的坐标,求两点间的距离
在平面直角坐标系中,已知两点坐标,求两点距离
matlab已知两点的坐标和第三点到两点的距离求第三点坐标怎么编程求解?
两点间距离计算公式在平面直角坐标系中,两点之间的距离怎么求?
求 坐标系中两点间的距离
在一直角坐标系中,已知两点之间的距离为t,一为原点,求另一点坐标
平面直角坐标系中,两点之间的距离
用 平面直角坐标系中两点间距离公式 已知A(2,1),B(4,3),c为坐标轴上的点,求c点坐标
在平面直角坐标系中,有一个等边△ABC,已知两点坐标A(x1,y1),B(x2,y2),求第三点C的坐标.
已知两点坐标,求两点距离公式
已知两点坐标,第三点到两点的距离,求第三点的坐标公式
空间直角坐标系中两点间的距离怎么求