수학을 도입하시겠습니까?
# 분리 가능한 작업 구현
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
DJ 1 = 2400000.5
DJ2 = MJD
DJ = DJ 1+DJ2
D 1 =''
D2 ='' 입니다
J =''
JD ='' 입니다
(DJ & ltDJMIN 또는 DJ & gtDJMAX) 인 경우:
J =-1
인쇄? "u" 잘못된 날짜: "+MJD
J 인쇄
그렇지 않은 경우:
J = 0
If (DJ1> = DJ2):
D 1 = DJ 1
D2 = DJ2
그렇지 않은 경우:
D 1 = DJ2
D2 = DJ 1
D2 = D2-0.5
F 1 = D 1% 1.0
F2 = D2% 1.0
F = (F 1+F2)% 1.0
If(F & lt；; 0) :F = F+1.0
D = 원 (D 1-F 1)+원 (D2-F2)+원 (F 1+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), 146 100 1)
L = L-div( 146 1*I, 4)+3 1
K = div( 80*L, 2447)
ID = L-div( 2447*K, 80)
L = div(K, 1 1)
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]), 입니다
--
& gt& gt& gt?
17366+05277 에 해당하는 날짜는 [1906,6,5,14,54,59] 입니다.
& gt& gt& gt?
/html/ 온라인-계산 /609.html
웹사이트를 온라인으로 검색할 수 있나요?
이 결과?