Price fraction: Difference between revisions
Content added Content deleted
No edit summary |
(added Inform 7 solution) |
||
Line 654: | Line 654: | ||
0.837450 0.90 |
0.837450 0.90 |
||
0.228953 0.38</pre> |
0.228953 0.38</pre> |
||
=={{header|Inform 7}}== |
|||
Inform doesn't have native floating-point support; this version uses fixed point numbers with two decimal places. |
|||
<lang inform7>Home is a room. |
|||
Price is a kind of value. 0.99 specifies a price. |
|||
Table of Price Standardization |
|||
upper bound replacement |
|||
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 |
|||
To decide which price is the standardized value of (P - price): |
|||
repeat with N running from 1 to the number of rows in the Table of Price Standardization: |
|||
choose row N in the Table of Price Standardization; |
|||
if P is less than the upper bound entry, decide on the replacement entry. |
|||
When play begins: |
|||
repeat with N running from 1 to 5: |
|||
let P be a random price between 0.00 and 1.00; |
|||
say "[P] -> [standardized value of P]."; |
|||
end the story.</lang> |
|||
=={{header|J}}== |
=={{header|J}}== |
||
'''Solution:''' |
'''Solution:''' |