LO NUEVO
 
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.