| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Randomize & массив [D2005, 2003]
roof © (2008-07-04 22:40:00)ПревеД!Всем
Как заполнить одномесный массив через рандомиз?
{RASkov} (2008-07-04 23:19:00) [1]> [6] roof (04.07.08 23:14)
Вот тебя бог наказал... прямо не везет некоторым :(
:о)
roof (2008-07-04 23:14:00) [2]Неа:))
{RASkov} (2008-07-04 23:11:00) [3]> [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:02:00) [4]Как зачем, что бы постоянно не наберать
Loginov Dmitry (2008-07-04 22:56:00) [5]> Как заполнить одномесный массив через рандомиз?
Тебе зачем?
roof (2008-07-04 22:49:00) [6]Одномерный
Правильный^Вася (2008-07-04 22:43:00) [7]
> одномесный массив
это как?
Random + F1
| |
