0votos

Creando Paquetes en Haskell

por josejuan hace 4 años

.

Obtener la minima cantidad de Paquetes

1
2
3
4
5
6
7
8
9
10
11
12
13
14
empaqueta n = listToMaybe [(a, b) | a <- [0..n `div` 3], let (b, r) = (n - 3 * a) `divMod` 5, r == 0] 
 
 
 
{- 
 
Prelude> mapM_ (print . empaqueta) [11, 15, 16, 7, 4] 
Just (2,1) 
Just (0,3) 
Just (2,2) 
Nothing 
Nothing 
 
-} 

Comenta la solución

Tienes que identificarte para poder publicar tu comentario.