Anonymous user
Price fraction: Difference between revisions
added Inform 7 solution
No edit summary |
(added Inform 7 solution) |
||
Line 654:
0.837450 0.90
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}}==
'''Solution:'''
| |||