Führt die ganzzahlige Division durch.
#include <Math.au3>
_Div ( $iNum1, $iNum2 )
| $iNum1 | Die zu teilende ganze Zahl. |
| $iNum2 | Der ganzzahlige Teiler. |
| Erfolg: | Das ganzzahlige Ergebnis von $iNum1 geteilt durch $iNum2. @extended wird auf den ganzzahligen Rest gesetzt. |
| Fehler: | Setze @error, wenn $iNum2 |
Beide Operanden werden in Ganzzahlen umgewandelt.
@extended wird auf den ganzzahligen Rest Mod($iNum1, $iNum2) gesetzt.
Da @extended nicht auf einen Double-Wert gesetzt werden kann, siehe das Beispiel, um den Rest = -nan(ind) zu erhalten, wenn $iNum2 = 0;
#include <Math.au3>
Local $a = [ _
[-11, -2], _
[-11, 2], _
[11, -2], _
[11, 2], _
[10, 3], _
[10, -3], _
[10.1, -3.9], _
[10, 0], _
[0, 0] _
]
ConsoleWrite("Integer Division" & @TAB & "Integer Rest" & @TAB & "@extended" & @CRLF)
Local $n, $d, $q, $r
For $i = 0 To UBound($a) - 1
$n = $a[$i][0]
$d = $a[$i][1]
$q = _Div($n, $d)
If @error Then
$r = 0 / 0 ; Da @extended nicht auf einen Double-Wert gesetzt werden kann
Else
$r = @extended
EndIf
ConsoleWrite($n & "/" & $d & " = " & $q & @TAB & @TAB & $r & @TAB & @TAB & @TAB & @extended & @CRLF)
Next