public class Sayisal {
	int[] _kupon = new int[6];
	int _num;
	public Sayisal(){
		int sira = 0;
		while (sira < 6) {
			_num = (int) (1 + Math.random() * 49);
			if (!varmi(_kupon, _num))
				_kupon[sira++] = _num;
		}
	}
 
	private boolean varmi(int[] kupon, int num) {
		for (int x: kupon) {if (x == num) return true;}
		return false;
	}
 
	public String toString(){
	   String kuponStr = "";
	   for (int i = 0; i < 6; i++) kuponStr += (_kupon[i] + " ");
		return kuponStr;
	}
 
	public static void main(String[] args){
		byte kuponSayisi;
		if (args.length == 0) kuponSayisi = 1;
			else kuponSayisi = Byte.parseByte(args[0]);
 
		for (int i = 1; i <= kuponSayisi; i++){
			System.out.print(" " + i + ".kupon: ");
		System.out.println((new Sayisal()).toString());
		}
	}
}

java Sayisal
şeklinde girerseniz tek kolon oynayacaktır. eğer
java Sayisal 4
derseniz 4 kolon oynayacaktır.
Sayısal Kaynak kodları.
Sayısal derlenmiş hali.

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:)