Closed-----Number generator with specific number

[Wena]

Hi All

I need to generate 12 random numbers using a specific number and the sum of the 12 random numbers must = the specific number.

IE:

12000 \ 12 = 1000

1000 must be randomised.

Randomised numbers added together must equal 12000.

I have tried (With a loop of 12) Random ( [Min [, Max [, Flag]]] ) with $Min = 600 and $Max = 1400 but sometimes the sum of the 12 random numbers is lower than 12000 and somtimes higher.

Any Clues for me.

I do not expect anyone to write it for me but a point in the right direction would be of great help.

Thanks in advance

Alistair

Edited October 21, 2011 by Wena

[jchd]

Generate only 11 numbers as you did, then the 12th will need to be = the expected sum minus the actual sum of the 11.

[sleepydvdr]

This code will generate numbers and keep subtracting from the total until the last number, which will be what is left over.

#include <array.au3>
$finalNum = 12000
$addUpArray = 0
Dim $num[12]
 
For $i = 0 to 10 Step 1
    $num[$i] = Random(0, $finalNum - $addUpArray, 1)
    $addUpArray = $addUpArray + $num[$i]
Next
 
$num[11] = $finalNum - $addUpArray
_ArrayDisplay($num)
 
$finalTotal = $addUpArray + $num[11]
 
MsgBox(0, "", "And the final total is: " & $finalTotal)

However, that code produces large numbers to small. For more consistent random numbers, try this:

#include <array.au3>
 
$finalNum = 12000
 
$restart = 0
Dim $num[12]
 
Do
$addUpArray = 0
For $i = 0 to 10 Step 1
    $num[$i] = Random(0, $finalNum / 6, 1)
    $addUpArray = $addUpArray + $num[$i]
Next
If $addUpArray > 12000 Then
    $restart = 1
Else
    $restart = 0
EndIf
Until $restart = 0
$num[11] = $finalNum - $addUpArray
_ArrayDisplay($num)
 
$finalTotal = $addUpArray + $num[11]
 
MsgBox(0, "", "And the final total is: " & $finalTotal)

[Wena]

HI...Apologies for the late reply.

@JCHD-Thanks, although I did not use your method, it did give me a new look at the way I was writing my script and eventually got it working. Thank You

@Sleepydrdr - I wish I had seen your post early it would have halved the length of my script. Thank you..

Cheers thanks guys.