Price fraction: Difference between revisions
Content added Content deleted
Alextretyak (talk | contribs) (Added 11l) |
|||
Line 2,677: | Line 2,677: | ||
0.540447 --> 0.66</pre> |
0.540447 --> 0.66</pre> |
||
=={{header|Mathematica}}== |
=={{header|Mathematica}}/{{header|Wolfram Language}}== |
||
<lang Mathematica>PriceFraction[x_]:=Piecewise[{{.1, 0 <= x < 0.06}, {.18, x < .11}, {.26,x < 0.16}, |
<lang Mathematica>PriceFraction[x_]:=Piecewise[{{.1, 0 <= x < 0.06}, {.18, x < .11}, {.26,x < 0.16}, |
||
{.32, x < .21}, {.38, x < .26}, {.44, x < 0.31}, {.5, x < .36}, |
{.32, x < .21}, {.38, x < .26}, {.44, x < 0.31}, {.5, x < .36}, |