1votos

Mounstro de las galletas (Haskell) en Clojure

por josejuan hace 3 años

.

Realizar el problema según los planteamientos dados en lenguaje de programación Haskell.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
(defn caso [] 
    (let [a (read)] 
        (if (> a 0) 
            (do 
                (println (Math/ceil (/ a (read)))) 
                (caso) 
 
(defn galletas [] 
    (do 
        (read) 
        (caso) 
 
(galletas) 
 
 
;; D:\clojure>clj galletas.clj 
;; 2 
;; 6 2 
;; 3.0 
;; 10 3 
;; 4.0 
;; 0 

Comenta la solución

Tienes que identificarte para poder publicar tu comentario.