Convert seconds to compound duration: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,301: / Line 1,301: @@
 =={{header|EasyLang}}==
-<lang>intvars
+<lang>func split sec . s$ .
+  divs[] = [ 60 60 24 7 ]
-func split sec . s$ .
-  div[] = [ 60 60 24 7 ]
   n$[] = [ "sec" "min" "hr" "d" "wk" ]
   len r[] 5
   for i range 4
-    r[i] = sec mod div[i]
+    r[i] = sec mod divs[i]
-    sec = sec / div[i]
+    sec = sec div divs[i]
   .
   r[4] = sec