日出日落時間計算程序(c語言)-資料下載頁
2025-07-07 14:18本頁面
【正文】 ):(int)(60*(set/15+Zone(glong)(int)(set/15+Zone(glong)))) .\n。 } //打印結(jié)果 int main(){ long double UTo=。 int year,month,date。 long double glat,glong。 int c[3]。 input_date(c)。 year=c[0]。 month=c[1]。 date=c[2]。 input_glat(c)。 glat=c[0]+c[1]/60+c[2]/3600。 input_glong(c)。 glong=c[0]+c[1]/60+c[2]/3600。 long double rise,set。 rise=result_rise(UT_rise(UTo,GHA(UTo,G_sun(t_century(days(year,month,date),UTo)),ecliptic_longitude(L_sun(t_century(days(year,month,date),UTo)),G_sun(t_century(days(year,month,date),UTo)))),glong,e(h,glat,sun_deviation(earth_tilt(t_century(days(year,month,date),UTo)),ecliptic_longitude(L_sun(t_century(days(year,month,date),UTo)),G_sun(t_century(days(year,month,date),UTo)))))),UTo,glong,glat,year,month,date)。 set=result_set(UT_set(UTo,GHA(UTo,G_sun(t_century(days(year,month,date),UTo)),ecliptic_longitude(L_sun(t_century(days(year,month,date),UTo)),G_sun(t_century(days(year,month,date),UTo)))),glong,e(h,glat,sun_deviation(earth_tilt(t_century(days(year,month,date),UTo)),ecliptic_longitude(L_sun(t_century(days(year,month,date),UTo)),G_sun(t_century(days(year,month,date),UTo)))))),UTo,glong,glat,year,month,date)。 output(rise,set,glong)。 system(pause)。 return 0。 }
數(shù)學相關(guān)推薦
鄂ICP備17016276號-1