ax := 1 ; a点的xy坐标 ay := 2 bx := 3 ; b点的xy坐标 by := 4 ; a到b距离 r := Sqrt((ax - bx)*(ax - bx) + (ay - by)*(ay - by)) ; Sqrt求平方根 MsgBox, a点到b点距离:%r% ; c到a距离8.485281 d := 8 cx := (d*(bx-ax))/r + ax cy := (d*(by-ay))/r + ay MsgBox, c点坐标:%cx% , %cy%
声明:站内资源为整理优化好的代码上传分享与学习研究,如果是开源代码基本都会标明出处,方便大家扩展学习路径。请不要恶意搬运,破坏站长辛苦整理维护的劳动成果。本站为爱好者分享站点,所有内容不作为商业行为。如若本站上传内容侵犯了原著者的合法权益,请联系我们进行删除下架。
评论(0)