Was verwendest du überhaupt als Datentyp?
Integer, float, ...
x ist zu Beginn eine Ganzzahl und wird es auch immer bleiben, wenn nur Ganzzahlen draufaddiert werden. Und wenn x ganzzahlig ist, dann ist es auch x*x.
Warum willst du testen, was ohnehin offensichtlich ist?
Ich bin mit Basic nicht so vertraut und habe auf diesem PC auch nichts zum Testen, aber etwa so geht das Prüfen von Gleitpunktzahlen auf Ganzzahligkeit:
code:
1:
2:
3:
If x = Math.Floor(x) ' wenn x gleich dem abgerundeten Wert von x ist
'...
End If
x = -2
Do Until x > 10
x = x + 3
If x = Math.Floor(x) Then
Console.WriteLine(x & "*" & x & "=" & x * x & vbCrLf & "Ergebnis ist ganzzahlig!")
Else
Console.WriteLine("x=" & x & vbCrLf & vbCrLf & "x * = " & x * x & vbCrLf & "Ergebnis ist nicht geradzahlig!")
End If
Loop
End Sub
End Module
15.09.2013 17:45
xXJennyXx unregistriert
wie kann man nun diese Wiederholungsstruktur durch eine Zählschleife ersetzen?