Price fraction: Difference between revisions
Added Arturo implementation
MaiconSoft (talk | contribs) m (fix order) |
Drkameleon (talk | contribs) (Added Arturo implementation) |
||
Line 735:
1.00 -> 1.00
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}}==
| |||