rendezvous with cassidoo challenge: 22.10.30

print_ascii.clj

(ns print-ascii)

(defn print-ascii []                                                                         
  (doseq [i (range 0x20 0x7F)]                                                                      
    (print (char i))))
    
;; If you want to print in sections exactly as shown in the prompt
(defn print-ascii-sections []                                                                    
  (doseq [section (partition-all 16 (range 0x20 0x7F))]                                                   
    (println (apply str (map char section)))))