Menor potencia de 2 que comienza por n
Definir las funciones
menorPotencia :: Integer -> (Integer,Integer) graficaMenoresExponentes :: Integer -> IO ()
tales que
- (menorPotencia n) es el par (k,m) donde m es la menor potencia de 2 que empieza por n y k es su exponentes (es decir, 2^k = m). Por ejemplo,
menorPotencia 3 == (5,32) menorPotencia 7 == (46,70368744177664) fst (menorPotencia 982) == 3973 fst (menorPotencia 32627) == 28557 fst (menorPotencia 158426) == 40000
- (graficaMenoresExponentes n) dibuja la gráfica de los exponentes de 2 en las menores potencias de los n primeros números enteros positivos. Por ejemplo, (graficaMenoresExponentes 200) dibuja