Funkcionálne programovanie cvičenie 7
Created: 2009-11-19 - 20:07
(string->symbol "Martin")
;vrati: Martin
(eq? 'Martin 'martin)
;vrati: false
(string->symbol "J. P. Martin")
;vrati: |J. P. Martin|
(symbol? '|J. P. Martin|)
;vrati: true
(symbol? 'a\(b)
;vrati: true
'a\(b
;vrati: |a(b|
(eq? 'a\(b '|a(b|)
;vrati: true
;uloha: definujte/vytvorte konverznu tabulku medzi ASCII kodmi a znakmi (0-255)
(define (tabulka i x)
(if (>= i 0)
(tabulka (- i 1)
(cons (list i (integer->char i))
x))
x))
(print-vector-length #t)
(list->vector '(1 2 3))
(print-vector-length)
;vrati: #3(1 2 3)
; #t
;Definujte proceduru vyssieho radu pomocou ktorej vyrobite zoznamy
;(1 2 ... n)
;(1 2 ... n*n)
;(n n+1 ... 2n)
;vstupne argumenty budu nejake funkcie :D