Sonunda bir dönem daha bitti. Yav aslında çokta olmadı başlayalı. Neyse ikinci döneme bomba gibi başlamak dileğiyle bu dönemi bitirelim.
Bu girdi Burdaki girdiden esinlenilerek yazıldı.
E madem pyton ile sayısal kuponu yapılıyor biz niye scheme ile yapmayalım bunu demi:)
Probleme göre kod bana çok uzun geldi. Belki ilerde optimize edebilirim. Ama şimdilik böyle oynayalım demi:)
(define (sayisal)
(display "Oynamak istediginiz kolan sayisini giriniz: \n")
(let ((kolon (read)))
(do ((i 1 (+ i 1))) ((> i kolon))
(let loop ((lst (list (+ (random 49) 1)))
(sayi (+ 1 (random 49))))
(if (= (length lst) 6)
(printf "~a. kolon: ~a\n" i (sort lst < ))
(if (member sayi lst)
(loop lst (+ (random 49) 1))
(loop (append lst (list sayi))
(+ (random 49) 1))))))))
(sayisal);burası kodun çalıştırılması için.
;aslında define kısmı çıkartılarak buna gerek kalmamayabilir
;ama ilerde belki başka birşey içinde kullanırım:)
Bu günlerde bi msn virüsü yayılmaya başladı. Msn üzerinden kişilere bu senin resmin mi?, oh sen çıplak gibisinden mesajlar ve bir adet link (http://members.lycos.co.uk/facebookphotos/?msn_adresiniz gibisinden) yolluyor. eğer bu linke tıklarsanız size resim dosyası görünümünde bir virüs yolluyor. Sizde buna tıklayınca olan oluyor:) Artık sizin kişi listenizdeki kişilere bu mesajlar gidiyor ve onlara da olan oluyor. Geçen gün bu virüsü bir bilgisayardan temizledim. Belki işinize yarar diye yazıyorum buraya.
Bu gün yahoo mailime girerken bi uyarı ile karşılatım
We can increase site speed and efficiency for you by copying your user information (which may include sensitive data) to one of our servers in another country . Please note that privacy protections provided by another country may be different from those provided by your country. For more information about how Yahoo! treats your information, check out our privacy policies.
[YES] Create a copy. Click this button to optimize performance. By doing so, you permit Yahoo! to process and duplicate your personal information on servers located in another country .
[NO] Don’t create a copy. Click this button if you do not wish to have your personal information copied to servers located in another country . You can still use our service, though the site may not perform optimally.
Burda bana eğer kişisel bilgilerinizi -Hassas bilgilerde olabilir- başka ülkelerdeki sunuculara kopyalama izni verirseniz sitedeki hızınızı arttırabiliriz diyordu.
Bunun benim için ne anlamı olabilirdi bir düşündüm. Olsa olsa kişel bilgilerimi siğer sunculara kopyalayıp, bu sunucularıda belli bir ücret karşılığı reklam firmalarına veya herhangi bir kuruluşa pazarlayabilirlerdi. Bu olmasa bile ne kadar çok bilgisayarda bilgilerimin olması okadar çok açık ve okadar çok üçüncü şahısların eline geçebilme ihtimali demekti. Bu ihtimaller açısından ben buna izin vermedim -gerçi çok özel bilgilerim yok ama olsun-.