RosettaCodeData/Task/Random-numbers/Free-Pascal-Lazarus/random-numbers.pas

function randg(mean,stddev: float): float;