value[1] := random(500);
как это понять random > 0.5
if random > 0.5 then letter[1] := 'K' else letter[1] := 'D';
и что записывается в первый массив
а что тут чего такие числы маненкие 0.25 для чего
if random > 0.25 then begin { с вероятностью 75% - случайное значение }
value[i] := 2 * random(43000)
и от куда такие проценты то 75 то 25 то еще чтото
а зачем это если и так будет много чисел
else begin { с вероятностью 25% - значение, выдающее гарантированное решение }
value[i] := value[i - 1] + random(30); { <--- Пауза между зажиганием меньше 30 секунд}
if letter[i - 1] = 'K'
then letter[i] := 'D' else letter[i] := 'K'; { а светофоры в I-1 и I - _разные_ }
end;
Сообщение отредактировано: maksimla -