vfp 怎样计算时间平均值
来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/11/12 18:01:55
vfp 怎样计算时间平均值
比如 一人上班分别为8:50,8.30,8.45,9.20 到达,这4天到达的平均时间值?
肯定有个算法,10进制变60进制的问题,一下俺归纳不起来.有现成的望奉献.
比如 一人上班分别为8:50,8.30,8.45,9.20 到达,这4天到达的平均时间值?
肯定有个算法,10进制变60进制的问题,一下俺归纳不起来.有现成的望奉献.
CLEAR
LOCAL nH,nM,nAVG
&& 8:50,8.30,8.45,9.20
nAVG = (HM2M(8,50) + HM2M(8,30) + HM2M(8,45) + HM2M(9,20)) / 4
M2HM(nAVG,@nH,@nM)
"平均时间:",STR(nH,2)+":"+ ALLTRIM(STR(nM))
&& 时分格式转分钟格式
PROCEDURE HM2M(nH,nM)
RETURN nH*60+nM
ENDPROC
&& 分钟格式转时分格式
PROCEDURE M2HM(nHM,nH,nM)
nH = INT(nHM/60)
nM = INT(MOD(nHM,60))
ENDPROC
LOCAL nH,nM,nAVG
&& 8:50,8.30,8.45,9.20
nAVG = (HM2M(8,50) + HM2M(8,30) + HM2M(8,45) + HM2M(9,20)) / 4
M2HM(nAVG,@nH,@nM)
"平均时间:",STR(nH,2)+":"+ ALLTRIM(STR(nM))
&& 时分格式转分钟格式
PROCEDURE HM2M(nH,nM)
RETURN nH*60+nM
ENDPROC
&& 分钟格式转时分格式
PROCEDURE M2HM(nHM,nH,nM)
nH = INT(nHM/60)
nM = INT(MOD(nHM,60))
ENDPROC