VPF::Как можно задать диапазоны в массиве?

Cordon

Дата 6.1.2008, 23:33 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 6.1.2008

Репутация: нет
Всего: нет

В чем собственно вопрос!Нужно задать диапазоны генерирования(интегрирования) массива.В VBA все выходит изумительно следуя формуле A(i, j) = Int((f2 - f1 + 1) * Rnd) + f1 но программа пишеться в Дельфи и функцию Random там нужно указывать с параметром, но формула этого не позволятет!
Подскажите кто может, как можно задать диапазоны в массиве! заранее благодарен!

Yanis

Дата 7.1.2008, 00:33 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 6
Всего: 111

Используй RandomRange из модуля Math.
Или же вручную:

Код

  A[i][j] := Random(100 - 10) + 10;
  // заполнит элемент (i,j) массива A
  // 10 <= x < 100 числом

Это сообщение отредактировал(а) Yanis - 7.1.2008, 00:54

--------------------

*щёлк*

remax

Дата 7.1.2008, 15:55 (ссылка)

(нет голосов)

Загрузка ...

Доцент

Профиль
Группа: Участник Клуба
Сообщений: 686
Регистрация: 7.4.2002
Где: Украина, Харьков

Репутация: нет
Всего: 5

В чем проблема! Для твоей формулы используй Random без параметров. И все ок!
В Паскале две формы функции Random
- Без параметра генерит вещественные числа в интервале [0, 1[
- c целочисленным параметром N генерит целые числа в интервале [0, N-1]

Добавлено через 6 минут и 44 секунды
Обрати внимание, что

Код


 Random(100 - 10) + 10;

Код


  Random*(100 - 10) + 10;

Это совершенно разные вещи, хотя и вернут случайно число в близком интервале
в первом случае - результат целое число в интервале [10, 99]
во втором случае - результат вещественное число в интервале [10, 100[

--------------------

Как бы ты не старался быть хорошим и правильным человеком с принципами и уважительным отношением к другим, всегда найдется кто-то, кто бросит в тебя какашку

Cordon

Дата 7.1.2008, 17:04 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 6.1.2008

Репутация: нет
Всего: нет

Благодарю:remax и Yanis !!! Да с утра и сам догнал! и пробовал же так! только видать сонный был! Но все равно респект Вам!

Добавлено через 51 секунду
Думаю что топик можно закрывать!!Хотя... все на усмотрение модеров!

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »