powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Опять вопрос про массив со случайными числами
4 сообщений из 4, страница 1 из 1
Опять вопрос про массив со случайными числами
    #32355952
Jimy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Мне уже отвечали , но видимо, не так поняли...
Как его заселить случайными числами я и сам знал. Но мне нужна случайная последовательность НЕПОВТОРЯЮЩИХСЯ чисел. (1,2,8,4,6,7,5 .... ит.д.)
...
Рейтинг: 0 / 0
Опять вопрос про массив со случайными числами
    #32355988
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А какие проблемы проверить перед добавлением факт существования такого значения в массиве. Например:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
LOCAL laRand( 10 ), lnI, lnNewValue
laRand= 0 
RAND(- 1 )
FOR lnI= 1  TO  10 
	lnNewValue=INT(RAND()* 10 )
	DO WHILE ASCAN(laRand,m.lnNewValue)> 0 
		lnNewValue=INT(RAND()* 10 )
	ENDDO
	laRand[m.lnI]=m.lnNewValue
ENDFOR
...
Рейтинг: 0 / 0
Опять вопрос про массив со случайными числами
    #32356234
Фотография NNN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
#define COUNT_OF_ITEMS       10 
LOCAL ARRAY laRand[COUNT_OF_ITEMS]
LOCAL ARRAY laTemp[COUNT_OF_ITEMS]
LOCAL i ,j , n
RAND(- 1 )
n=COUNT_OF_ITEMS
FOR i= 1  TO COUNT_OF_ITEMS
	laTemp[i]=i
ENDFOR 
FOR i= 1  TO COUNT_OF_ITEMS
	j=INT(RAND()*n)+ 1 
	laRand[i]=laTemp[j]
	=ADEL(laTemp,j)
	n=n- 1 
ENDFOR 
FOR i= 1  TO COUNT_OF_ITEMS
	?laRand[i]
ENDFOR
...
Рейтинг: 0 / 0
Опять вопрос про массив со случайными числами
    #32356345
Соня_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно еще в отдельной переменной (или таблице) хранить последнее вставленное в массив значение, а при новой вставке увеличивать это значение на единицу. То есть вставляться будут значения п/п с 1. Это на случай, если проверять весь массив каждый раз неохота.
А на случай многопользовательской работы нужно сначала изменить (увеличить) значения счетчика в переменной (или таблице), а потом вставлять это значение в массив.
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Опять вопрос про массив со случайными числами
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]