Nästa: Stränghantering Upp: Fördeklarerade procedurer och funktioner Förra: Tid

Slumptal

Funktionen Random(x:Integer):Real returnerar ett slumptal mellan 0.0 och 1.0. Argumentet x har ingen som helst betydelse och ignoreras fullständigt. Enklast är att anropa med Random(0). För att slumpgeneratorn inte ska generera samma slumptalsföljd vid varje körning måste man anropa funktionen Seed(x:Integer):Integer som sätter generatorvariabeln (slumpgeneratorns frö) till x. Seed returnerar generatorvariabelns gamla värde. Rekommendation: Skriv raden
Discard(Seed(Wallclock));
först i huvudprogrammet i varje program som nyttjar funktionen Random. Då ställs slumptalsgeneratorvariabeln till ett värde beroende av den aktuella tiden.