Códigos
Haskell
Videos
Diseño web
|
Turbo Pascal |
Triángulo
Este programa determina si los catetos e hipotenusa introducidos, forman o no un triángulo, si es asi muestra que tipo de triángulo es, ya sea triángulo equilátero, isóceles, rectángulo o escaleno. Código fuente
|
Haskell |
Lista de la serie de fibonacci
Programa que dada una lista de números enteros,
devuelve solo aquellos numeros que pertenecen a la serie de fibonacci.
Código fuente
ver::Int->Int->Int->Bool
ver a b 0=True
ver a b n|(a+b)==n=True
|a+b>n=False
|otherwise=ver b (a+b) n
selfibo::[Int]->[Int]
selfibo []=[]
selfibo (x:xs)|k==True=x:selfibo xs
|otherwise=selfibo xs
where k=ver 0 1 x
|
|
Haskell |
Suma diagonal principal
Dada una lista de listas o matriz de números enteros, realiza la suma de la diagonal principal.
Código fuente
dph::Int->[Int]->Int
dph b as=as!!b
dip::Int->[[Int]]->Int
dip _ []=0
dip k (x:xs)=dph k (x)+dip (k+1) xs
dp::[[Int]]->Int
dp (xs)=dip 0 (xs)
|
|
|
Nuevo |
Publicado el:
22 - Agosto - 2009
Códigos Pascal
Triangulo
Este programa determina si los catetos e hipotenusa introducidos, forman o no un triángulo, si es asi muestra que tipo de triángulo es, ya sea triángulo equilátero, isóceles, rectángulo o escaleno. |
Nuevo |
Publicado el:
22 - Agosto - 2009
Haskell
Serie Fibonacci
Lista de la serie de fibonacci
Programa que dada una lista de números enteros, devuelve solo aquellos numeros que pertenecen a la serie de fibonacci.
|
Nuevo |
Publicado el:
21 - Agosto - 2009
Códigos Pascal
Suma diagonal principal
Dada una lista de listas o matriz de números enteros, realiza la suma de la diagonal principal. |
|