La función aleatoria en COBOL