Actualización de «Regiones determinadas por n rectas del plano»
He actualizado las soluciones del ejercicio Regiones determinadas por n rectas del plano cuyo enunciado es
En los siguientes dibujos se observa que el número máximo de regiones en el plano generadas con 1, 2 ó 3 líneas son 2, 4 ó 7, respectivamente.
\ |
\5|
\|
\
|\
| \
| | \
1 1 | 3 1 | 3 \ 6
------ ---|--- ---|----\---
2 2 | 4 2 | 4 \ 7
| | \
Definir la función
regiones :: Integer -> Integer
tal que (regiones n) es el número máximo de regiones en el plano generadas con n líneas. Por ejemplo,
regiones 1 == 2 regiones 2 == 4 regiones 3 == 7 regiones 100 == 5051 regiones 1000 == 500501 regiones 10000 == 50005001 length (show (regiones (10^(10^5)))) == 200000 length (show (regiones (10^(10^6)))) == 2000000 length (show (regiones (10^(10^7)))) == 20000000