1
2
3
4
5
6
(defn print-down-from [x]
  (when (not pos? x)
    (println x)
    (recur (dec x))))
 
(print-down-from 4)

1
2
3
4
5
6
(defn print-down-from [x]
  (when (not (pos? x))
    (println x)
    (recur (dec x))))
 
(print-down-from 4)

1
2
3
4
5
6
(defn print-down-from [x]
  (when (pos? x)
    (println x)
    (recur (dec x))))
 
(print-down-from 4)

1
2
3
4
5
(println (let [r         5
      pi        3.1415
      r-squared (* r r)]
  (println "radius is" r)
  (* pi r-squared)))

1
2
3
4
5
(let [r         5
      pi        3.1415
      r-squared (* r r)]
  (println "radius is" r)
  (* pi r-squared))

1
2
(def x 42)
(.start (Thread. #(println "Answer: " x)))

1
2
(def x 42)
.start (Thread. #(println "Answer: " x)))

1
2
3
4
5
(println
((fn arity2+ [x y & z] [x y z]) 1 2 [3 4] [5 6])
)
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
(println
((fn arity2+ [x y & [z]] [x y z]) 1 2 [3 4] [5 6])
)
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
(println
((fn arity2+ [x y & [z]] [x y z]) 1 2 [3 4])
)
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
(println
((fn arity2+ [x y & [z]] [x y z]) 1 2 [3] [4])
)
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
(println
((fn arity2+ [x y & [z]] [x y z]) 1 2 3 4)
)
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
(println
((fn arity2+ [x y & [z]] [x y z]) 1 2 3)
)
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
(println
((fn arity2+ [x y & [z]] [x y z]) 1 2)
)
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
(println
((fn arity2+ [x y & z] [x y z]) 1 2)
)
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
(println
((fn arity2+ [x y & z] [x y z]) 1 2 3 4)
)
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
6
(println
((fn
  ([x]   #{x})
  ([x y] #{x y})) 4 2 0))
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
6
(println
((fn
  ([x]   #{x})
  ([x y] #{x y})) 4 2))
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
6
(println
((fn
  ([x]   #{x})
  ([x y] #{x y})) 42))
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
4
5
((fn
  ([x]   #{x})
  ([x y] #{x y})) 42)
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
((fn [x y] #{x y}) 1 2)
 
(println (set [1 2 3 2 1 2 3]))

1
2
3
((fn [x y] #{x y}) 1 2)
 
(set [1 2 3 2 1 2 3])

1
2
3
4
5
6
7
(def population {:zombies 2700, :humans 9})
 
(:zombies population)
 
(println (/ (:zombies population)
            (:humans population))
         "zombies per capita")

1
2
3
(def population {:zombies 2700, :humans 9})
 
(:zombies population)

1
2
3
4
5
6
7
8
9
    #include <iostream>
    #include <vector>
    using namespace std;
 
unsigned int a,b,d,n;
unsigned int odw[1000001]={};
unsigned int odl[1000001]={};
unsigned int ojc[1000001]={};
unsigned int max_odl_1=0,max_odl_2=0,pozycja_1,pozycja_2;
 ...

1
(filter #(not (nil? %)) (map #(when (= 99 %1) %2) [-1 1 0 99 100 101] (range 0)))

1
(filter #(not (nil? %)) (map #(when (= 99 %1) %2) [-1 1 0 99 100 101] (range)))

1
(filter #(not (nil? %)) (map#(when (= 99 %1) %2) [-1 1 0 99 100 101] (range)))

1
(filter #(not (nil? %)) (map#(when (= 99 %1) %2) [-1 1 0 99 100 101] (range))

1
2
3
4
5
(display (< 1 2))
(display (random 1000))
(define (square a) (* a a))
(display (time (square 3)))