Могу послать по почте ZIP-файл программ к книге
O.Montenbruck, T.Pfleger
ASTRONOMY ON THE PERSONAL COMPUTER
(3rd edition 1997)
Там есть программа
ORBDET
Gaussian orbit determination from three observations using the abbreviated method of Bucerius
version 93/07/01
Было и следующее издание, переведенное на русский язык, может оно еще есть в интернет-магазинах. Там прилагается диск с программами на языке СИ каком-то.