Price fraction: Difference between revisions
Content added Content deleted
MaiconSoft (talk | contribs) m (fix order) |
Drkameleon (talk | contribs) (Added Arturo implementation) |
||
Line 735: | Line 735: | ||
1.00 -> 1.00 |
1.00 -> 1.00 |
||
1.05 -> Out of range.</pre> |
1.05 -> Out of range.</pre> |
||
=={{header|Arturo}}== |
|||
<lang rebol>pricePoints: [ |
|||
0.06 0.10 0.11 0.18 0.16 0.26 0.21 0.32 |
|||
0.26 0.38 0.31 0.44 0.36 0.50 0.41 0.54 |
|||
0.46 0.58 0.51 0.62 0.56 0.66 0.61 0.70 |
|||
0.66 0.74 0.71 0.78 0.76 0.82 0.81 0.86 |
|||
0.86 0.90 0.91 0.94 0.96 0.98 1.01 1.00 |
|||
] |
|||
getPricePoint: function [price][ |
|||
loop pricePoints [limit,correct][ |
|||
if price < limit -> return correct |
|||
] |
|||
] |
|||
tests: [0.3793 0.4425 0.0746 0.6918 0.2993 0.5486 0.7849 0.9383 0.2292] |
|||
loop tests 'test [ |
|||
print [test "=>" getPricePoint test] |
|||
]</lang> |
|||
{{out}} |
|||
<pre>0.3793 => 0.54 |
|||
0.4425 => 0.58 |
|||
0.0746 => 0.18 |
|||
0.6918 => 0.78 |
|||
0.2993 => 0.44 |
|||
0.5486 => 0.66 |
|||
0.7849 => 0.86 |
|||
0.9383 => 0.98 |
|||
0.2292 => 0.38</pre> |
|||
=={{header|AutoHotkey}}== |
=={{header|AutoHotkey}}== |