Wurzeln Wie schreibt man die

[Axxus]

Ok das funzt schon ma
Aber wer pythagoräische zahlen in der Schule gehabt hat weiß, das es nur gillt wenn alles ganze zahlen sind
Beispiel:
3² + 4² = 5²
oder algemein
x² + y² = z²
So bei meinem prog geht der ne bestimmte anzahl an zahlen durch und setzt diese für a und b ein
die formel is bis jetzt so

Delphi-Quellcode:

z1 : integer
z2 : double;
z1 := x*x + y*y;
z2 := sqrt (z1);

so ich hat eigentlich gedacht das ich es mit ner try except Schleife mache also das ich die Wurzel aus z1 (also z2) als integer deklariere und wenn es ne Komma oder irrationale zahl wird dann soll er nichts machen und wenn es ne ganzzahl wird dann soll er sie in ne liste eintragen

Ich kann aber z2 nicht als integer eklarieren weil sonst ein Fehler auftrit. Deswegen

Wie kann ich feststellen ob eine zahl ne GAnzzahl ist???

bitte antwortet schnell ich will es bis morgen fertig haben


Danke im vorraus

Axxus