求指导怎么写一个计算日出日落时间的程序 - delphi吧

level 2

当年的倔小子楼主

用的是delphi6，怎么写出计算日出日落的程序？

2017年05月09日 11点05分 1

吧务

level 14

BambooCaep

你先说清楚用笔怎么算日出日落

2017年05月09日 12点05分 2

当年的倔小子

日出时间=〔180+时区*15-经度-arccos〖tan{10547π/81000*cos[2π*(日期+9)/365]}*tan(纬度*π/180)〗*180/π〕/15 日落时间=〔180+时区*15-经度+arccos〖tan{10547π/81000*cos[2π*(日期+9)/365]}*tan(纬度*π/180)〗*180/π〕/15 这里的时区，经纬度，我都可以自行选择，怎么求每天的日出日落时间

2017年05月09日 12点05分

BambooCaep

@当年的倔小子引用math单元

2017年05月09日 14点05分

level 8

yc515623878

加我

2017年05月10日 03点05分 3