Izlases funkcija COBOL

Programmēšanas valodai COBOL, kas ir viena no vecākajām, kas joprojām tiek regulāri izmantota, ir spēcīga novirze uz biznesa lietojumprogrammām, piemēram, grāmatvedību, algu un krājumu kontroli. Tomēr jaunākajām COBOL versijām ir sarežģītas matemātiskas funkcijas, tostarp viena nejaušu skaitļu ģenerēšanai. Lai gan ikdienas uzņēmējdarbības grāmatvedībā tos reti izmanto, nejaušie skaitļi palīdz atvieglot statistiskos aprēķinus un noteikta veida skaitliskas problēmu risināšanas metodes.

COBOL matemātikas funkcijas ir daļa no valodas procedūru nodaļas, programmas sadaļas, kas sastāv no procesuāliem paziņojumiem. Funkcijas sākas ar rezervēto vārdu "funkcija", kam seko funkcijas nosaukums, piemēram, "cos", "random" vai "baļķis". Funkcija izmanto vienu vai vairākus argumentus, veic tiem procesu un atgriež rezultātu atpakaļ COBOL programma. Dažas funkcijas darbojas ar cipariem un ciparu mainīgajiem, bet citas darbojas ar rakstzīmju datiem.

Nejaušības funkcija izmanto nenegatīvu vesela skaitļa argumentu un atgriež decimālo skaitli. Vesela skaitļa arguments nav obligāts. Tas ir pseidogadījuma matemātiskā procesa sākums, kas nosaka funkcijas pirmo atgriezto skaitli. Datoru valodās visi nejaušie procesi patiesībā ir gari, atkārtojot skaitļu sērijas, kas šķiet nejaušas. Labi izvēlēts process atkārtojas tikai pēc miljardiem vērtību, tāpēc tas ir praktisks nejaušu skaitļu avots, pat ja tas nav teorētiski tīrs. Ja nejaušajai funkcijai pievienosit argumentu, tā ģenerēs tādu pašu skaitļu secību. Bez argumenta nejaušā funkcija ģenerē nākamo skaitli savā secībā.

Nejaušības funkcija COBOL atgriež decimālskaitļus diapazonā no nulles līdz vienam. Statistiski nejaušajiem skaitļiem ir taisnstūrveida sadalījums, kas nozīmē, ka katrs skaitlis ir vienlīdz iespējams. Garas nejaušu skaitļu sērijas grafikam būs salīdzinoši plakana līnija, kas stiepjas no nulles līdz gandrīz vienam. Tas kontrastē ar parasto jeb Gausa sadalījumu, kas veido zvanveida līkni.

Nejaušu funkciju decimālskaitļi paši par sevi nav īpaši noderīgi, taču, reizinot tos ar mērogošanas koeficientu, jūs izveidojat savai lietojumprogrammai piemērotu nejaušu skaitļu diapazonu. Piemēram, lai iegūtu nejaušus veselus skaitļus no viena līdz 52, izmantojiet šādu COBOL priekšrakstu: COMPUTE RANDOM-VALUE = FUNCTION RANDOM (1) * 52 + 1.

Paziņojumā izlases funkcija ģenerē skaitļus, kas ir lielāki vai vienādi ar nulli un mazāki par vienu. Reizinot to ar 52, jūs iegūstat skaitļus no nulles līdz 51. Pievienojot vienu, jūs iegūstat diapazonu no viena līdz 52.