[ABTOMAT]

Третий:
как находить длину PxRay?

Теорема Пифагора спешит на помощь!

Function TeoremaPifagora#(x1#,y1#,z1#,x2#,y2#=0,z2#=0)
	Return Sqr((x1 - x2)^2+(y1 - y2)^2+(z1 - z2)^2)
End Function