Głowie się i głowie i nic nie mogę wykombinować w tym Turbo Delphi. Jak wylosować powiedzmy liczbę 1.24 z przedziału 0-1 ? Szukałem w google.
#Edit
Dobra wymyśliłem coś takiego, losuje jak trzeba. Teraz moje pytanie brzmi jak sformatować tą wylosowaną liczbę do 2 miejsc po przecinku ?
var
tab : array[0..300] of single;
i : integer;
x : integer;
begin
randomize();
for i := 1 to 199 do
tab[i] := i / 100;
Label1.Caption := FloatToStr(tab[random(200)]);
end;