導入數學?
#實現可分操作
def?div(x,y):
return int(round(x)/round(y))。
#return $cal2('x ',' x ',p_div,x,y);
def DF2DHMS(F):?
df = F
日=數學.樓層(df)
hour = math . floor((df-天)*24)
分鐘= math . floor((df-天-小時/24)*1440)
秒=(日-小時/24分鐘/1440)*86400
返回[日、小時、分鐘、秒]
MJD = 17366.62152773142
DJMIN = -68569.5
DJMAX = 1e9
DJ1 = 2400000.5
DJ2 = MJD
DJ = DJ1 + DJ2
D1 = ' '
D2 = ' '
J = ' '
JD = ' '
如果(DJ & ltDJMIN還是DJ & gtDJMAX):
J = -1
打印?“u”無效日期:“+MJD
打印J
否則:
J = 0
if(DJ 1 & gt;= DJ2):
D1 = DJ1
D2 = DJ2
否則:
D1 = DJ2
D2 = DJ1
D2 = D2 - 0.5
F1 = D1%1.0
F2 = D2%1.0
F = (F1+F2) % 1.0
if(F & lt;0 ) :F = F + 1.0
D =圓形(D1-F1) +圓形(D2-F2) +圓形(F1+F2-F)
JD = round(D) + 1
L = JD + 68569
N = div( 4*L,146097)
L = L - div(( 146097*N + 3),4)
I = div( 4000 * (L+1),1461001)
L = L - div( 1461*I,4) + 31
K = div( 80*L,2447)
ID = L - div( 2447*K,80)
L = div(K,11)
IM = K + 2 - 12*L
IY = 100 * ( N-49 ) + I + L
FD = DF2DHMS(F)
打印MJD,'對應日期是',[iy,im,int (id),int (FD [1]),int (FD [2]),FD [3]]
-
& gt& gt& gt?
17366+05277對應的日期是【1906,6,5,14,54,59】。
& gt& gt& gt?
/html/在線-計算/609.html
網站可以在線搜索嗎?
這個結果?