A véletlenszerű függvény a COBOL-ban

A COBOL programozási nyelv, amely az egyik legrégebbi, még mindig rendszeresen használt programozási nyelv, erős torzítással rendelkezik az üzleti alkalmazások, például a könyvelés, a bérszámfejtés és a készletellenőrzés irányába. A COBOL újabb verziói azonban kifinomult matematikai függvényekkel rendelkeznek, köztük egy véletlen számok generálására is. Bár ritkán használják a napi üzleti számvitelhez, a véletlen számok segítenek megkönnyíteni a statisztikai számításokat és bizonyos típusú numerikus problémamegoldó technikákat.

A COBOL matematikai függvények a nyelv eljárási felosztásának részét képezik, a program procedurális utasításokból álló része. A függvények a fenntartott "function" szóval kezdődnek, amelyet a függvény neve követ, például "cos", "random" vagy "napló". Egy függvény egy vagy több argumentumot vesz fel, folyamatot hajt végre rajtuk, és az eredményt visszaadja a COBOL-nak program. Egyes függvények számokon és numerikus változókon, míg mások karakteres adatokon dolgoznak.

A véletlen függvény egy nem negatív egész argumentumot vesz fel, és egy decimális számot ad vissza. Az egész argumentum nem kötelező. Ez egy pszeudo-véletlen matematikai folyamat magja, amely meghatározza a függvény első visszaadott számát. A számítógépes nyelvekben minden véletlenszerű folyamat valójában hosszú, ismétlődő számsorok, amelyek véletlenszerűnek tűnnek. Egy jól megválasztott folyamat csak többmilliárd érték után ismétlődik, tehát gyakorlati véletlenszámforrás, még ha elméletileg nem is tiszta. Ha a véletlenszerű függvényt argumentummal látja el, az ugyanazt a számsorozatot generálja. Az argumentum nélkül a véletlen függvény generálja a sorozat következő számát.

A COBOL véletlenszerű függvénye nullától egyig terjedő decimális számokat ad vissza. Statisztikailag a véletlen számok téglalap alakú eloszlásúak, ami azt jelenti, hogy mindegyik szám egyformán valószínű. A véletlen számok hosszú sorozatának grafikonja viszonylag lapos vonallal rendelkezik, amely nullától majdnem egyig terjed. Ez ellentétben áll a normál vagy Gauss-eloszlással, amely harang alakú görbét alkot.

Önmagukban a véletlenfüggvényű decimális számok nem túl hasznosak, de ha megszorozzuk őket egy skálázási tényezővel, akkor az alkalmazásunknak megfelelő véletlenszám-tartományt hozunk létre. Például egy és 52 közötti véletlenszerű egész számok megszerzéséhez használja a következő COBOL utasítást: COMPUTE RANDOM-VALUE = FUNCTION RANDOM (1) * 52 + 1.

Az utasításban a véletlen függvény nullánál nagyobb vagy azzal egyenlő és egynél kisebb számokat generál. Ha ezt megszorozzuk 52-vel, akkor nulla és 51 közötti számokat kapunk. Ha hozzáad egyet, az egytől 52-ig terjedő tartományt kap.