domingo, 29 de julho de 2012

Exemplos de programas nessa linguagem


Direto no Console:

reverse “linguagens de programacao”

20*20

10^10

[1..100]

[2,4..100]

[1..]



Através de Scripts


1)
z = sq x / sq y
sq n = n * n
x = a + b
y = a - b
a = 10
b = 5

Ao solicitar o valor de “z”, o retorno será “9”

2)dias_uteis_da_semana = ["seg", "ter", "qua","qui", "sex"] dias_da_semana = dias_uteis_da_semana ++ ["sab", "dom"]

3)funcao :: Int -> Int
funcao x = x^2


4)divInt a b = if b == 0 then a else div a b
resto a b = if b /= 0 then a `mod` b else 0
soma x y = (+) x y
vogal a = if a=='a' || a=='e' || a=='i' || a=='o' ||a=='u'
    then True
    else False


5)comprimento l=length l
vazia []= True
vazia _ = False
primeiro :: [Int] -> Int
primeiro lista = head lista junta :: [Int] -> [Int] -> [Int] 
 junta lista1 lista2 = lista1 ++ lista2


6)vezes2 n = n * 2


7)main = do putStrLn "Hello World"

Nenhum comentário:

Postar um comentário