1votos

Secuencia aleatoria no repetida en Haskell

por josejuan hace 3 años

.

Crear una secuencia de números en un rango fijo de manera aleatoria y mostrar en pantalla cada número uno a uno sin repetir.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
aleatoria = putStr "Rango hasta: "                -- Preguntar nº 
          » readLn                                -- Leer nº 
          ↪ evalRandIO ∘ shuffleM ∘ enumFromTo 0  -- Obtener secuencia aleatoria 
          ↪ ↱_print                               -- Imprimir los nºs 
          » putStrLn "Fin"                        -- Fin 
 
 
{-  
  
> aleatoria  
Rango hasta: 4  
4  
0  
1  
3  
2  
Fin  
> aleatoria  
Rango hasta: 3  
1  
2  
0  
3  
Fin  
> aleatoria  
Rango hasta: 2  
1  
0  
2  
Fin  
>   
  
-} 

Comenta la solución

Tienes que identificarte para poder publicar tu comentario.