4 gennemsnit må ikke ligge for tæt

Kunne du ikke lave et loop?

Lav et loop som løber
while(diff ikke god nok)
  random = random()
og så gemme diff som forskel på sidste tal og nyeste tal?

hmm hvordan ?

Hvad skal den gøre hvis der ikke er nok imellem? Skip? Add? Exception?

Ved godt det er VBA kode men ideen er den sammen :-), hvis der er nogle der har bedre læsninger vil jeg gerne høre det


Set RngToCover = ActiveSheet.Range("B3:E3")
Set RngToTjeck = ActiveSheet.Range("B3:E3")
restart:

    For Each Cell In RngToCover
      For Each Celltjek In RngToTjeck
          If (Cell - Celltjek) = 0 Then
            GoTo endd
            End If
   
            If Abs(Cell - Celltjek) <= 0.023 Then
              Cell.Value = Cell.Value + 0.001
              GoTo restart
            End If
endd:
      Next Celltjek
  Next Cell

Jeg er ikke den store C# haj.
Men har her forsøgt mig i php.
Håber du så selv kan udtænke løsningen i c#. :o)

<?php

$diff = 0.23;
$ran1 = (rand(1,100)/100);
$ran2 = (rand(1,100)/100);
$ran3 = (rand(1,100)/100);
$ran4 = (rand(1,100)/100);

while(abs($ran1-$ran2) < $diff){
  $ran2 = (rand(1,100)/100);
}

while(abs($ran2-$ran3) < $diff){
  $ran3 = (rand(1,100)/100);
}

while(abs($ran3-$ran4) < $diff){
  $ran4 = (rand(1,100)/100);
}

echo "RAN1: " . $ran1 . '<br />';
echo "RAN2: " . $ran2 . '<br />';
echo "RAN3: " . $ran3 . '<br />';
echo "RAN4: " . $ran4 . '<br />';

?>

Hvor stor må forskellen være?

Ahh, Janus, det kan du gøre bedre :-)

Han skriver "0,23".

minimum nul komma treogtyve imellem... hmmm