[HaBo]

cls
$rand=New-ObjectSystem.Random
$SpielerA= 0
$SpielerB= 0
$Unentschieden= 0
$Runden= 10000000
$Counter= 1
$Ergebniss= 1
while ($Counter-le$Runden)
{
write-host$Counter
$Schleife= 1
while ($Schleife-le 3)
{
$Schleife++
$Würfel=$rand.next(1,6)
$Ergebniss=$Ergebniss+$Würfel
}
IF ($Ergebniss-lt 10)
{
$SpielerB++
}
ElseIF ($Ergebniss-gt 10)
{
$SpielerA++
}
Else
{
$Unentschieden++
} 
$Ergebniss= 0
$Counter++
}
IF ($SpielerA-gt$SpielerB)
{
Write-Host"Spieler A ist im Vorteil"
Write-Host"Spieler A: "$SpielerA
Write-Host"Spieler B: "$SpielerB
}
ElseIF ($SpielerB-gt$SpielerA)
{
Write-Host"Spieler B ist im Vorteil"
Write-Host"Spieler A: "$SpielerA
Write-Host"Spieler B: "$SpielerB
}
Else
{
Write-Host"Unentschieden"
}

        /*
         * Ermitteln wieviele moegliche Kombinationen es pro Wert gibt
         */
        HashMap<Integer, Integer> map = new HashMap<Integer, Integer>();    // Hier koennte man auch nen Array nehmen, (zu faul ;))
        int max = 6;    // bestimmt die Seiten der Wuerfel
        double toPay = 10;    // hier kann angegeben werden wieviel pro Spiel bezahlt wird
        int count = (int) Math.pow(max, 3);
        int old;
        for (int i = 1; i <= max; i++) {
            for (int j = 1; j <= max; j++) {
                for (int j2 = 1; j2 <= max; j2++) {
                    old = map.get(i+j+j2)!=null?map.get(i+j+j2):0;
                    map.put(i+j+j2, old+1);                    
                }
            }
        }
        
        /*
        * Gewichteter Mittelwert und Ergebnis bilden
        */
        double avg = 0;
        for (Entry<Integer, Integer> entry : map.entrySet()) {
            avg += entry.getValue() * entry.getKey();
        }
        avg /= count*1.0;
        System.out.println("Average: " + avg);
        System.out.println("Average result: " + (avg - toPay));