У кого есть код, генератора чисел?

← →
Magisimus © (2003-12-15 21:54) [40]

> >Magisimus © (12.12.03 09:05) [24]
> А вы проверяли его работоспособность? У меня он не работает
> - в слысле, выдает неверные результаты. Теоретически, такой
> алгоритм может выдать результат "0000".

Да проверял, но извиняюсь не то выложил...

var i,sum:integer; r:array[1..4] of integer; ... sum:=14; For i:=1 to 3 do begin r[i]:=random(10-((sum div 10)+(sum mod 10))); {или сюда r[i]:=random(((sum div 10)+(sum mod 10)));} dec(sum,r[i]); end; r[4]:=sum mod 10; inc(r[random(3)+1],sum-r[4]);

Вот это почти тоже самое,но работает всегда. Я просто скопировал не то... Извиняюсь...

← →
Diablo (2003-12-15 22:53) [41]

Ну IronHawk пытался обучаться по методике Юрия Зотова, да плюнул. Ему ведь не надо знать всякие ненужности по основам информатики, он и так крутой программер.

← →
IronHawk © (2003-12-17 17:28) [42]

> Diablo (15.12.03 22:53) [41]

Поумничал?
Самоутвердился?
Молодец, хвалю!

← →
Val © (2003-12-17 18:19) [43]

вот так и разводят программистов. увлеклись, поспорили, код дали. :)

← →
Sandman25 © (2003-12-17 18:20) [44]

[43] Val © (17.12.03 18:19)

Так он же даже не смог его запустить. О каких-то отрицательных числах пишет :)

← →
IronHawk © (2003-12-24 12:36) [45]

> Val © (17.12.03 18:19) [43]

Ты ошибся, нужный код был ещё в 5 посте, а это уже живые дебаты, а ты их, своим постом, превратил в изврат...

> Sandman25 © (17.12.03 18:20) [44]

:-)))
Код поправь, а то только отрицательные и лезут!

← →
Sandman25 © (2003-12-24 13:30) [46]

[45] IronHawk © (24.12.03 12:36)

[16] запускай, а не предыдущие версии :)

← →
Val © (2003-12-24 14:38) [47]

>IronHawk © (24.12.03 12:36) [45]
Я .. в изврат? Но мне кажется, подобные вопросы - вот где _настоящий_жесткий_ изврат , hardcore блин :))
>Sandman25 © (17.12.03 18:20) [44]
помогите запустить же, зачем ему "отрицаловка"? ;)

← →
Sandman25 © (2003-12-24 15:26) [48]

[47] Val © (24.12.03 14:38)

Что еще я могу сделать? Все мое сообщение [16] - обработчик нажатия кнопки Button1. Еще на форме должен быть Memo1: TMemo. Из текста это ясно.

← →
Val © (2003-12-24 15:28) [49]

>Sandman25 © (24.12.03 15:26) [48]
Что еще я могу сделать?
Вдолбить! :)

> Sandman25 © (24.12.03 13:30) [46]

Ответ не верен!

> Val © (24.12.03 14:38) [47]
> Val © (24.12.03 15:28) [49]

Ты уже можешь расслабится, я тебе разрешаю, я уже всё давно написал, как всегда спасибо MBo © (11.12.03 14:09) [13] ,
а ты так, поприкалывался, потешил своё самолюбие, а теперь свободен...

>IronHawk © (25.12.03 18:21) [51]
Ты уже можешь расслабится..
Спасибо, именно вашего разрешения я ждал все это время :)
я уже всё давно написал, как всегда спасибо MBo © (11.12.03 14:09) [13]
Так это он написал. О чем я и начал :)
а ты так, поприкалывался, потешил своё самолюбие, а теперь свободен...<i/>
Угу, поприкалывался, а где связь с самолюбием и моей свободой? :)

[51] IronHawk © (25.12.03 18:21)

2 раза проверял. В D3 и в D6. Больше на эту удочку не попадусь. Ты прав, моя версия работает только в Кишиневе. Извини, я не могу это исправить.

У кого есть код, генератора чисел? Найти похожие ветки