如何生成没有种子的随机数？

Question

我试着找到rand()的等价物，它生成一个0到1之间没有种子的随机数。有人能告诉我如何在ADA中实现这一目标吗？

Answer 1

使用Ada.Numerics.Float_Random。

G : Ada.Numerics.Float_Random.Generator;
R : Ada.Numerics.Float_Random.Uniformly_Distributed;

-- Get a random number
R := Ada.Numerics.Float_Random.Random(G);