Membuat Fungsi IsPrima LISP

1. Membuat fungsi untuk menghitung banyaknya faktor dari inputan n dengan a = 1


(defun bykFktr (a n)
          (cond     ((= a n) 1)
                        ((= (modulo n a) 0) (+ 1 (bykFktr (a + 1)  n ) ) )
                        (t (bykFktr (a + 1) n) )
          )
)


2. Menentukan apakah n bilangan prima ==> fungsi banyak faktor harus menghasilkan angka 2


(defun IsPrima (n)
          (if (= (bykFktr 1 n) 2)  t  nil)
)

Menghitung Banyaknya Elemen Ganjil pada List

(defun BykElmtGnjl (L)     ====> List
          (cond     ((null L)  0)
                        ((oddp (firstelmt L))  (+ 1 (bykElmtGnjl  (cdr L))))     ==> Rekursif dengan penambahan 1 untuk setiap elemen ganjil
                        (t  (BykElmtGnjl (tail L)))                                            ==> Kondisi default
          )
)

Google Membuat Kita "Bodoh" (?)

Google, sebuah kata yang sudah tidak asing lagi bagi setiap orang. Beberapa hal yang ada di dalam pikiran seseorang
1. Google sebagai search engine dapat memudahkan kita dalam mencari berbagai informasi di dunia maya.
2. Google Calendar dapat mengingatkan kita tentang schedule yang harus kita lakukan.
3. Gmail yang dapat menampung bertriliunan email dari seluruh dunia dengan kualitas dan bandwidth server yang sudah pasti berkualitas.
4. Google+, situs pertemanan yang akan menyaingi facebook.
dan masih banyak lagi fasilitas-fasilitas google yang lainnya. Belum lagi jika google mengakuisi situs-situs besar lainnya yang semakin memudahkan hidup kita. Namun apakah google benar-benar memudahkan hidup kita? jika dilihat secara dangkal jawabannya adalah 'ya'. Namun jika dianalisa lebih mendalam, bisa muncul jawaban 'tidak'. Bagaimana bisa demikian?

Teknologi Handphone dan Sejarahnya

Handphone, tentunya sebuah perangkat yang sudah tidak asing lagi bagi semua orang. Dari presiden, pejabat, PNS, bahkan orang-orang yang tergolong menengah ke bawah juga sudah memanfaatkan perangkat tersebut. Namun bagaimana sesungguhnya sejarah dari handphone itu sendiri?