Kandungan
Bahasa pengaturcaraan COBOL, salah satu yang tertua masih digunakan, sangat ditujukan kepada aplikasi perniagaan seperti perakaunan, gaji, dan kawalan inventori. Walau bagaimanapun, versi baru mempunyai fungsi matematik yang canggih, termasuk satu untuk menjana nombor rawak. Walaupun jarang digunakan dalam perakaunan perniagaan sehari-hari, bilangan rawak membantu memudahkan pengiraan statistik dan kelas-kelas teknik tertentu untuk menyelesaikan masalah berangka.
Fungsi
Fungsi matematik COBOL adalah sebahagian daripada pembahagian bahasa prosedur, iaitu, bahagian program yang mengandungi ayat prosedur. Fungsi bermula dengan perkataan "fungsi" yang ditinggalkan diikuti oleh nama fungsi, seperti "cos", "rawak" atau "log". Fungsi mengambil satu atau lebih argumen, melakukan proses dengan mereka, dan mengembalikan hasil kepada program di COBOL. Sesetengah fungsi berfungsi dengan nombor dan nilai berangka, sementara yang lain bekerja dengan data alfanumerik.
Rawak
Fungsi rawak meminta hujah integer bukan negatif dan mengembalikan nombor perpuluhan. Hujah adalah pilihan, dan merupakan benih untuk proses matematik pseudo-rawak yang menentukan nombor pertama yang dikembalikan oleh fungsi. Dalam bahasa pengaturcaraan, semua proses rawak adalah, sebenarnya, siri panjang dan berulang nombor yang kelihatan rawak. Proses yang dipilih dengan baik mengulangi angka-angka hanya selepas berbilion-bilion kitaran dan oleh itu adalah sumber praktikal nombor unik, walaupun dalam teori mereka bukan semata-mata rawak. Jika anda lulus argumen pada fungsi, ia akan menjana urutan nombor yang sama. Tanpa hujah, fungsi ini akan menghasilkan nombor seterusnya dalam urutan semasa.
Selang dan pengedaran
Fungsi acak COBOL mengembalikan nombor perpuluhan antara sifar dan satu. Secara statistik, nombor rawak mempunyai taburan segiempat tepat, yang bermaksud bahawa masing-masing adalah sama. Grafik satu siri besar nombor rawak akan mempunyai garis yang relatif rata dari sifar hingga hampir satu. Ini berbeza dengan pengedaran normal atau Gaussian, yang membentuk keluk berbentuk loceng.
Guna
Nombor perpuluhan yang dihasilkan oleh fungsi rawak tidak begitu berguna, tetapi jika anda membiaknya dengan faktor skala, anda boleh membuat pelbagai nombor rawak yang boleh digunakan untuk aplikasi anda. Sebagai contoh, untuk mendapatkan bilangan bulat rawak antara 1 dan 52, anda boleh menggunakan pernyataan berikut dalam COBOL: KOMPUTER RANDOM-VALUE = RANDOM FUNGSI (1) * 52 + 1. Di sini, fungsi menjana nombor antara sifar dan kurang daripada satu; mengalikannya dengan 52, anda mendapat nombor antara 0 dan 51. Apabila anda menambah 1, selang akan berubah dari 1 hingga 52.