S. Ryley bewies 1825 folgendes Theorem:
Jede rationale Zahl kann als Summe von drei rationalen Würfeln ausgedrückt werden.
Herausforderung
Gegeben einige rationale Zahl drei rationalen Zahlen finden , so dass
Einzelheiten
Ihr Beitrag sollte in der Lage sein, für jede Eingabe eine Lösung zu berechnen, wenn genügend Zeit und Speicher vorhanden sind. Das bedeutet, dass beispielsweise zwei 32-Bit-Zeichen, int
die einen Bruch darstellen, nicht ausreichen.
Beispiele
code-golf
math
number-theory
rational-numbers
polynomials
fehlerhaft
quelle
quelle
[p1,p2,p3,q]
, interpretiert als & le ;Antworten:
Pari / GP , 40 Bytes
Probieren Sie es online!
Gleiche Länge, gleiche Formel:
Probieren Sie es online!
Check it online!
quelle
Haskell,
9589766968 bytesTry it online!
Simple bruteforce solution. It tests all triples of rational numbers of the form(a1n,a2n,a3n)with −n≤ain≤n.
quelle
[-n,1/n-n..n]
Husk, 14 bytes
Simple brute force solution. Try it online!
Explanation
Division in Husk uses rational numbers by default and Cartesian products work correctly for infinite lists, making this a very straightforward program.
quelle
JavaScript (Node.js), 73 bytes
Takes input asp and q are BigInt literals.
(p)(q)
, whereReturnspq=(p1q1)3+(p2q2)3+(p3q3)3 .
[[p1,q1],[p2,q2],[p3,q3]]
such thatTry it online!
Derived from H. W. Richmond (1930), On Rational Solutions of x3 + y3 +z3 = R.
quelle
Haskell, 70 bytes
In An introduction to the Theory of Numbers (by Hardy and Wright) there is an construction that even includes a rational parameter. For golfing purposes I just set this parameter to 1, and tried reducing as much as possible. This results in the formula
Try it online!
quelle
perl -Mbigrat -nE, 85 bytes
You can save 8 bytes (the leading
$_=eval;
) if you know the input is an integer; this part is needed to have the program grok an input of the form308/1728
. Input is read from STDIN. I'm using the formula given by @alephalpha.quelle