Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.05;
Скачать: CL | DM;

Вниз

case of   Найти похожие ветки 

 
lameridze   (2003-05-25 18:04) [0]

Люююди- сами знаете кто,

есть:

var
l:word;
const
arr: array[1..10] of word = (1,2,3,4,5,6,7,8,9,10);
begin
randomize;
l := random(?????);


надо:

вместо ?????? че-нить вставить, чт. происходил выбор значений элементов из arr (т.е. от 1 до 10).


 
MBo ©   (2003-05-25 18:10) [1]

l := arr[1+random(10)]);
при таком наборе чисел в arr зачем он вообще нужен????



 
Palladin ©   (2003-05-25 19:41) [2]


> - сами знаете кто

хитёр однако парень...
однако грех не помочь :)


 
Diamond Cat ©   (2003-05-25 20:28) [3]


> MBo © (25.05.03 18:10)
> l := arr[1+random(10)]);
random(9) :о)


 
Palladin ©   (2003-05-25 21:30) [4]


> Diamond Cat © (25.05.03 20:28)

нэ, не спорь с MBo, MasterBrain усе таки...
и жутко прав с замечанием по поводу набора чисел...


 
Anatoly Podgoretsky ©   (2003-05-25 21:56) [5]

Diamond Cat © (25.05.03 20:28)
Ты как прикалываешься или серьезно?


 
Arch-vile ©   (2003-05-25 21:59) [6]

random(N) никогда не выдаст число N.


 
DrPass ©   (2003-05-25 22:09) [7]

Спасибо, будем знать


 
MBo ©   (2003-05-26 06:25) [8]

>Diamond Cat
нет, Random(9) генерирует числа от 0 до 8 включительно.


 
Anatoly Podgoretsky ©   (2003-05-26 07:56) [9]

Кто то Soft переименовал в Cat


 
lameridze   (2003-05-26 12:15) [10]

так че писать-то:

..
l:=arr[1+random(?_число элементов массива_?)]ж
..

и зачем "1+"


 
MBo ©   (2003-05-26 12:18) [11]

:(


 
lameridze   (2003-05-26 12:23) [12]

o--|====>


 
Skier ©   (2003-05-26 12:24) [13]

"Над кем смеётесь ?! Над собой смеётесь !" :))) (С) Н.В. Гоголь.


 
Arch-vile ©   (2003-05-26 15:20) [14]

l:=arr[1+random(?_число элементов массива_?)]
Если массив базируется на 0 (array[0..n-1]) или динамический, тогда +1 не надо. Если массив статический и базируется на 1 (array[1..n]) тогда +1. Потому что Random(9)=0..8, array[1+0..8]=array[1..9]
Вроде немного запутанно, но надеюсь, что поймешь



Страницы: 1 вся ветка

Текущий архив: 2003.06.05;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.023 c
8-13338
Saracin
2003-02-20 18:51
2003.06.05
Как перевести рисунок из TCanvas в TBitmap ?


3-13034
Andy Eremin
2003-05-16 14:16
2003.06.05
смена кодировки


3-13084
DruKiller
2003-05-17 21:58
2003.06.05
Скрещивание Delphi и MySQL


1-13299
KA-87
2003-05-24 12:45
2003.06.05
А как в программе можно реализовать подсветку синтаксиса?


1-13183
Top Gun
2003-05-24 11:41
2003.06.05
Исключение в Finalization