Actividad 4

LENGUAJES FUNCIONALES


Ke onda compañeros ..
aqui les dejo 2 porgrams uno sencillito y otro unpoquito mas complicado elaborados en HASKELL...
batalle un chorro en econtrar un tutorial bueno que me puediera explicar aparte que tambien recivi ayuda.
espero les sirva esta actividad.




















Haskell es un lenguaje de programación puramente funcional de propósito general yfuertemente tipado. Su nombre proviene del lógico Haskell Curry.


Dado un número "n" entero se separa el primer dígito haciendo uso de la función mod n 10, para luego este sumar al cociente de la división del numero n entre 10, (div n 10).
Código fuente

suma::Int->Int

suma 0=0

suma n=(mod n 10)+suma(div n 10)





suma::Int->Int
Lo que hace este programa es que cuando la variable n asuma el valor de 0 la función devolverá el valor de 0.
-----------------------------------------------------------------------------------------------------------------------------------


Otro programa realizado en Haskell conunpoquito mas de grado de dificultad bueno para mi si lo fue,.. que se encarga  de sumar.. el numero que le introdusiste o mas bien que sele dio al valor de n y depsues que los suma a cada uno de sus digitos por ejemplo 150.. loke ara el programa es sumas 1+5+0 = 6


Lueog los multiplicara y lansara el resultadoo...
1*5*0 = 0
 ly ahi acaba el programa.


Codigo


digitos ::Int->Int

digitos 0 = 0

digitos n =1+digitos (div n 10)



suma::Int->Int

suma 0=0

suma n=(mod n 10)+suma(div n 10)



prod::Int->Int

prod 0=1

prod n=(mod n 10)*prod(div n 10)



resultado::Int->String

resultado 0=""

resultado n="numero de digitos:"++show(cont n)++" "++"la suma es:"++show(suma n)++" "++"el producto es:"++show(prod n)


*****************************************************************
Yo me base mas en Haskell porque seme hizo mas sencillo
espeor les srivan estos programithas..
saludos
y los veo en clase :)