Petit calcul pour déterminer le Jour décimal Formule 1 ligne: ((S/60+I)/60+H)/24+J ============================================ (régler date et heure de la TI-83 ou 84) -------------------------------------------- PROGRAM:JDECIM EffÉcran EffTtesListes affDate→L₆ L₆(1)→A L₆(2)→M L₆(3)→J Disp " Jour décimale Disp "**************************" Output(4,5,"le"):Output(4,8,J) Output(4,11,"/"):Output(4,13,M) Output(4,16,"/"):Output(4,18,A) affHeure→L₅ L₅(1)→H L₅(2)→I L₅(3)→S Output(5,6,H):Output(5,8,"h") Output(5,10,I):Output(5,12,"mn") Output(5,15,S):Output(5,17,"sec") 24*H→H I/3*5→I S/3*5→S I/10000→I S/1000000→S arrondir(J+H+I+S,4)→G Output(7,10,G):Output(7,18,"jr") Output(9,1,"**************************") Pause EffÉcran EffTtesListes