Русалка

Мне нужно StrinGrid заполнить с помощью Randoma, в диапазоне от 0 до 1. У меня это получается, только нужно чтобы числа были десятичные.как это сделать?

kreol

К примеру сделать вмест просто random(number)
random(number)/random(number)

Gruvi

IntToStr(random(1)-1)
можно так.

kreol

Извините, не увидел диапазон
n := random(number);
if (not(n = 0))
begin
n := 1/n;
end;
//вставляем в грид

kreol

Если я не ошибаюсь то тут будет всегда -1

Vladimir_S

Коллеги, да вы чо? И в Паскале, и в Делфи функция Random БЕЗ ПАРАМЕТРОВ как раз и возвращает десятичное число в диапазоне 0..1. Так что
a:=Random;
И все дела!

kreol

о_О это для меня таки новость. спасибо за просвещение

Gruvi

Оу =) +1 , приятная новость =)

Русалка

Спасибо всем, у меня получилось, только у меня вот теперь другая загвоздка, мне надо что с помощью Randoma он выдавал числа не больше чем от 0 и до 0.5 и все они были положительные

Gruvi

эмм еще раз можно повторить корректнее ?
нужно что бы числа выводились от [0;0,5] ?
если я правильно понял, то заполнение идет примерно так:

var
float : single;
int : Integer;
i : Integer;

begin
// Получение случайных чисел с плавающей запятой в диапазоне 0 <= number <1.0
for i := 1 to 5 do
begin
float := Random;
ShowMessage('float = '+FloatToStr(float));
end;

ShowMessage('');

результат будет вот такой:
float = 2.3283064365387E-10
float = 0.031379981256104
float = 0.861048460006714
float = 0.202580958604813
float = 0.2729212641716