Averages/Mean time of day: Difference between revisions
→{{header|VBA}}: correct for negative value of angle ...
(→{{header|VBA}}: updated version, without storing data onto a worksheet) |
(→{{header|VBA}}: correct for negative value of angle ...) |
||
Line 2,119:
s(i) = 360 * TimeValue(s(i))
Next i
Debug.Print Format(mean_angle(s) / 360 + 1, "hh:mm:ss")
End Sub</lang>{{out}}
<pre>
=={{header|Yabasic}}==
|