#include <Array.au3>

; Arrays und Variablen definieren
Dim $ZAHLEN[5][10]
Dim $ZAHLEN_SPANNE[6][2]
Dim $ZEILE_ZWI = 0

;Zahlenspanne für Zufallszahlen
$ZAHLEN_SPANNE[0][0]=1
$ZAHLEN_SPANNE[0][1]=20
$ZAHLEN_SPANNE[1][0]=10
$ZAHLEN_SPANNE[1][1]=30
$ZAHLEN_SPANNE[2][0]=20
$ZAHLEN_SPANNE[2][1]=40
$ZAHLEN_SPANNE[3][0]=30
$ZAHLEN_SPANNE[3][1]=50
$ZAHLEN_SPANNE[4][0]=40
$ZAHLEN_SPANNE[4][1]=60


;Array Reset
for $ZEILE = 0 To 4 Step 1 
	for $SPALTE = 0 to 9 Step 1 
		$ZAHLEN[$ZEILE][$SPALTE] = 0
	Next
Next


For	$SPALTE = 0 to 9 Step 1
	For $ZEILE = 0 to 4 Step 1
		$ZWI = Random ( $ZAHLEN_SPANNE[$ZEILE][0],$ZAHLEN_SPANNE[$ZEILE][1], 1 )
		If $ZEILE > 0 Then
			$ZEILE_ZWI = $ZEILE-1
		EndIf
		If $ZWI < $ZAHLEN[$ZEILE_ZWI][$SPALTE] Then
			Do
			$ZWI = Random ( $ZAHLEN_SPANNE[$ZEILE][0],$ZAHLEN_SPANNE[$ZEILE][1], 1 )
			Until $ZWI > $ZAHLEN[$ZEILE_ZWI][$SPALTE]
		EndIf
		$ZAHLEN[$ZEILE][$SPALTE] = $ZWI
	Next
Next

_ArrayDisplay($ZAHLEN, "Zahlenreihen")