Prüfen ob Zahl irrational ist

[Axxus]

Erst ma sollte es für den PC kein Problem sein zumindest zu prüfen ob ein Wurzelausdruck irrational ist und Zwar so:

1. Gehen wir von einer Summe aus:
sqrt(367+91*2)
2. So nun Formen wir die Wurzel so um, dass aus der Summe ein Produkt wird (dieser Schritt gilt nur zur verdeutlichung, dass man ein Produkt benötigt)

3. Nun Haben wir:
sqrt(549)

4. Nun zerlegen wir das ganze in Primzahlen
sqrt(183*3)
sqrt(61*3*3)
So geht nicht weiter
Jetzt radizieren wir teilweise:
sqrt(61)*3
So da die Wurzel von Primzahlen immer irrational ist wisssen wir, das die Endzahl auch irrational ist

Ich dachte es gäbe eine Function in Delphi di sowas drauf hat gibts aber anscheinend nicht

(wäre interessant sowas ma selbst zu programieren)

Das jetzt erst mal unabhängig zum Dreieck

Im bezug auf das dreieck gibt es glaub ich keins das die anforderungen erfüllt

Man wasn mist

Naja egal

DAnke

Axxus