Вниз
Скачать: CL | DM;

Randomize & массив   Найти похожие ветки 

← →
roof   (2008-07-04 22:40) [0]

ПревеД!Всем

Как заполнить одномесный массив через рандомиз?


← →
Правильный^Вася   (2008-07-04 22:43) [1]


>  одномесный массив

это как?

Random + F1


← →
roof   (2008-07-04 22:49) [2]

Одномерный


← →
Loginov Dmitry ©   (2008-07-04 22:56) [3]

> Как заполнить одномесный массив через рандомиз?


Тебе зачем?


← →
roof   (2008-07-04 23:02) [4]

Как зачем, что бы постоянно не наберать


← →
{RASkov} ©   (2008-07-04 23:11) [5]

> [0] roof   (04.07.08 22:40)

Здарофф, а ты ваще чигонить умешь?
type TZnachenie = 0..1000;
var Odnomestnymasiff: array [byte] of TZnachenie;
   N: Integer;
function Randomiz: TZnachenie;
begin
  Result:=Low(TZnachenie)+Random(High(TZnachenie)-Low(TZnachenie));
end;
begin
 for N:=Low(Odnomestnymasiff) to High(Odnomestnymasiff) do
  Odnomestnymasiff[N]:=Randomiz;
end;


← →
roof   (2008-07-04 23:14) [6]

Неа:))


← →
{RASkov} ©   (2008-07-04 23:19) [7]

> [6] roof   (04.07.08 23:14)

Вот тебя бог наказал... прямо не везет некоторым :(
:о)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c
2-1215360644
observateur
2008-07-06 20:10
2008.08.03
widestring


15-1213558693
Pavia
2008-06-15 23:38
2008.08.03
Современные компьютерные технологии


15-1213651482
k2_
2008-06-17 01:24
2008.08.03
Симпатишный дизайн, полюбуйтесь.


2-1215269099
lewka
2008-07-05 18:44
2008.08.03
Перенос значения переменной


2-1215146453
lewka
2008-07-04 08:40
2008.08.03
Вставка текста в Memo




   Наверх