lunes, 1 de noviembre de 2010

Lab de lenguajes de progra (Dr.Elisa)

Programas en HASKELL

Hola a todos,

Aqui les dejo unos programas en el lenguaje haskell

Programa que te saca el cuadrado del numero:

Primero se creo un archivo en el cual se puso el siguiente (codigo).

cuadrado : : Integer -> Integer
cuadrado x = x * x
menor : : (Integer, Integer) -> Integer
menor (x,y) = if x <= y then x else y

Se guardo con la extesion .hs

Despues nos vamos a la consola de hugs ahi vamos a cargar el archivo creado,  vamos a la barra lateral de herramientas y seleccionamos el icono que dice:  load modules from specified file.

Ahi le damos click y seleccionamos el archivo y lo abrimos y nos debede aparecer como sigue:


La linea:  Prelude> :l "C:\\Users\\user\\Desktop\\cuadrados.hs" 
nos dice que se cargo sin errores




y para ver si funciona correctamente ponemos

Main>  cuadrado (5+5)

100

Main> cuadrado 8

64

Vemos que funcina correctamente:





Otro programa el cual saca el factorial de un numero:

Al igual que el otro se crea un archivo con la extension .hs

Se pone el siguiente codigo:

fact : : Int->Int

fact 0=1
fact n=n*fact(n-1)
 
Se guarda.
 
y hacemos lo mismo, lo cargamos y lo ejecutamos.
 
y lo checamos
 
Main> fact 5
120
 
Main> fact 6
720
 
Vemos que funciona correctamente:
 
 
 
Aqui otro programa,  este programa cuenta  el numero de digitos que introduces :
 
Codigo:

cont : : Int->Int

cont 0=0
cont n= 1+ cont (div n 10)
 
 
Este programa te cuenta en un rango del 1 al 10 ya que si introduces el 0 no lo va a contar porque lo esta descartando en el codigo.

Lo checamos.

Main> cont 1478522

7

Main> cont 012

2
 
 



Aqui les dejo donde descargar hugs:   http://cvs.haskell.org/Hugs/pages/downloading-Nov2003.htm


Bueno eso es todo,  espero y les haya servido
Saludos

ATTE: JESUS ALEJANRO BELTRAN REYNA
 

1 comentario: