0votos

Maria en Haskell

por josejuan hace 2 años

otra

Programa que determine si una persona es mayor de edad o no

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
import Control.Monad (when) 
 
adulto = (17<) 
 
sino 𝑇 = "si" 
sino 𝐹 = "no" 
 
main = putStr "Nombre: " » getLine ↪ λn → when (n ≢ "*") $  
       putStr "Edad: "   » readLn  ↪ λe → (putStrLn $ n ⧺ " de " ⧺ show e ⧺ " años " ⧺ sino (adulto e) ⧺ " es mayor de edad") 
                         » main 
                          
{- 
 
> main 
Nombre: Pedro 
Edad: 12 
Pedro de 12 años no es mayor de edad 
Nombre: Marta 
Edad: 34 
Marta de 34 años si es mayor de edad 
Nombre: * 
 
-} 

Comenta la solución

Tienes que identificarte para poder publicar tu comentario.