Worthwhile task shaving: Difference between revisions

m
→‎{{header|Phix}}: decided to put a proper header on it
(Created Nim solution.)
m (→‎{{header|Phix}}: decided to put a proper header on it)
Line 336:
<span style="color: #004080;">atom</span> <span style="color: #000000;">t</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">trunc</span><span style="color: #0000FF;">(</span><span style="color: #000000;">a</span><span style="color: #0000FF;">/</span><span style="color: #000000;">roundto</span><span style="color: #0000FF;">[</span><span style="color: #000000;">rdx</span><span style="color: #0000FF;">])</span>
<span style="color: #008080;">if</span> <span style="color: #000000;">rdx</span><span style="color: #0000FF;">></span><span style="color: #000000;">1</span> <span style="color: #008080;">and</span> <span style="color: #000000;">t</span><span style="color: #0000FF;"><</span><span style="color: #000000;">1</span> <span style="color: #008080;">then</span> <span style="color: #008080;">exit</span> <span style="color: #008080;">end</span> <span style="color: #008080;">if</span>
<span style="color: #000000;">es</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">sprintf</span><span style="color: #0000FF;">(</span><span style="color: #008000;">"%d %s%s"</span><span style="color: #0000FF;">,{</span><span style="color: #000000;">t</span><span style="color: #0000FF;">,</span><span style="color: #000000;">ts</span><span style="color: #0000FF;">[</span><span style="color: #000000;">rdx</span><span style="color: #0000FF;">],</span><span style="color: #0080807060A8;">iff</span><span style="color: #0000FF;">(</span><span style="color: #000000;">t</span><span style="color: #0000FF;">=</span><span style="color: #000000;">1</span><span style="color: #0000FF;">?</span><span style="color: #008000;">""</span><span style="color: #0000FF;">:</span><span style="color: #008000;">"s"</span><span style="color: #0000FF;">)})</span>
<span style="color: #008080;">end</span> <span style="color: #008080;">for</span>
<span style="color: #008080;">return</span> <span style="color: #000000;">es</span>
<span style="color: #008080;">end</span> <span style="color: #008080;">function</span>
<span style="color: #7060A8;">printf</span><span style="color: #0000FF;">(</span><span style="color: #000000;">1</span><span style="color: #0000FF;">,</span><span style="color: #008000;">" 50/day 5/day daily weekly monthly yearly\n"</span><span style="color: #0000FF;">)</span>
------------- How long can you work on making a routine task more -------------
------------- efficient before spending more time than you saved? -------------
------------------------------ (across five years) ----------------------------
----------+----------------------------------------------------------------------
Shave off | ------------------- How Often You Do The Task ----------------------
task time | 50/day 5/day daily weekly monthly yearly
----------+-----------+-----------+-----------+-----------+-----------+----------
"""</span><span style="color: #0000FF;">)</span>
<span style="color: #008080;">for</span> <span style="color: #000000;">s</span><span style="color: #0000FF;">=</span><span style="color: #000000;">1</span> <span style="color: #008080;">to</span> <span style="color: #7060A8;">length</span><span style="color: #0000FF;">(</span><span style="color: #000000;">shavings</span><span style="color: #0000FF;">)</span> <span style="color: #008080;">do</span>
<span style="color: #004080;">integer</span> <span style="color: #000000;">si</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">shavings</span><span style="color: #0000FF;">[</span><span style="color: #000000;">s</span><span style="color: #0000FF;">]</span>
Line 361 ⟶ 369:
Note that the standard builtins such as elapsed() have no facilities for non-standard terms such as 8 hour working days.
<pre>
------------- How long can you work on making a routine task more -------------
50/day 5/day daily weekly monthly yearly
------------- efficient before spending more time than you saved? -------------
------------------------------ (across five years) ----------------------------
----------+----------------------------------------------------------------------
Shave off | ------------------- How Often You Do The Task ----------------------
task time | 50/day 5/day daily weekly monthly yearly
----------+-----------+-----------+-----------+-----------+-----------+----------
1 sec 2 days 1 hour 20 mins 4 mins 1 min 5 secs
5 secs 2 weeks 1 day 1 hour 20 mins 5 mins 25 secs
7,805

edits