ВНИМАНИЕ! На форуме начался конкурс - астрофотография месяца ИЮЛЬ!
0 Пользователей и 2 Гостей просматривают эту тему.
Возведение в квадрат с помощью Math.Pow - тоже то ещё варварство.
double Az = Math.Atan(Math.Sin(Th * Math.PI / 180) * Math.Cos(Dec * Math.PI / 180) * Math.Cos(Lat * Math.PI / 180) / (Math.Sin(H * Math.PI / 180) * Math.Sin(Lat * Math.PI / 180) - Math.Sin(Dec * Math.PI / 180))) * 180 / Math.PI;
Открыть формулы сферической тригонометрии и обсчитать треугольник "Северный географичесекий полюс" - "Северный магнитный полюс" - "Текущее положение". Угол, противолежащий стороне "Северный магнитный полюс" - "Северный географический полюс" и будет для данной местности искомой поправкой.