0votos

Mostrar pares recursiva en Haskell

por josejuan hace 6 años

Esta cumple con la definición. Es recursiva y funciona para cualquier 'n' de la recta real.

mostrar en la salida los m mayores que sea menores que n

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
mayoresPares 0 _ = [] 
mayoresPares m n = a : mayoresPares (m - 1) (a - 2) 
  where a = fromIntegral $ 2 * floor (n / 2) 
 
 
 
 
 
{-- 
*Main> mayoresPares 3 6 
[6.0,4.0,2.0] 
*Main> mayoresPares 4 3 
[2.0,0.0,-2.0,-4.0] 
*Main> mayoresPares 0 8 
[] 
*Main> mayoresPares 3 (-3.3) 
[-4.0,-6.0,-8.0] 
*Main> mayoresPares 3 13.3 
[12.0,10.0,8.0] 
--} 

Comenta la solución

Tienes que identificarte para poder publicar tu comentario.