[Nhờ giúp đỡ] Nối các list với nhau

[huunhantvxdts 195]

Tôi có list như sau

1.("A" "B")

2.("1" "2" "3")

3.("1.2" "2.3" "3.2" "2.1")

ghép 1 và 2 để thành

("1" "A" "2" "B" "3")

sau đó ghép với 3 để thành

("1.2" "1" "2.3" "A" "2" "3.2" "B" "3" "2.1")

[Danh Cong 422]

Quy luật ghép với thằng thứ 3 thế nào vậy bác @@, em hiểu (1 +2 ) thì được, nhưng đến (1 + 2) + (3) thì mù tịt ^^

[huunhantvxdts 195]

15 phút ago, Danh Cong cho biết:

Quy luật ghép với thằng thứ 3 thế nào vậy bác @@, em hiểu (1 +2 ) thì được, nhưng đến (1 + 2) + (3) thì mù tịt ^^

Lấy 1 phần tử đầu tiên của (1+2) nhét vào giữa 1 và 2 của thằng 3 sau đó lấy 2 phần tử tiếp theo nhét vào giữa 2 và 3 của thằng 3, rồi còn 2 phần tử còn lại nhét vào giữa 3 và 4 của thằng 3

 

[Danh Cong 422]

Nếu chỉ sử dụng từng đấy con số thì sao bác không sử dụng hàm (NTH ...) nhỉ ? ^^.

Mà bác làm ở Trường Sơn ạ?

[huunhantvxdts 195]

9 giờ trước, Danh Cong cho biết:

Nếu chỉ sử dụng từng đấy con số thì sao bác không sử dụng hàm (NTH ...) nhỉ ? ^^.

Mà bác làm ở Trường Sơn ạ?

ok ừ làm ở TVTK Trường Sơn Quảng Bình

[Danh Cong 422]

Gửi bác bản sơ cua nhất: 

(defun c:test ()
  (setq ds1 (list 'A 'B)
    ds2 (list 1 2 3)
    ds3 (list 1.2 2.3 3.2 2.1))
  (setq ds123 (list (nth 0 ds3) (nth 0 ds2) (nth 1 ds3) (nth 0 ds1) (nth 1 ds2) (nth 2 ds3) (nth 1 ds1) (nth 2 ds2) (nth 3 ds3)))
  (princ)
  )

[huunhantvxdts 195]

3 giờ trước, Danh Cong cho biết:

Gửi bác bản sơ cua nhất: 

(defun c:test ()
  (setq ds1 (list 'A 'B)
    ds2 (list 1 2 3)
    ds3 (list 1.2 2.3 3.2 2.1))
  (setq ds123 (list (nth 0 ds3) (nth 0 ds2) (nth 1 ds3) (nth 0 ds1) (nth 1 ds2) (nth 2 ds3) (nth 1 ds1) (nth 2 ds2) (nth 3 ds3)))
  (princ)
  )

Ok nghĩ cao siêu quá bạn gợi ý là mình làm được rồi

Cám ơn bạn nhiều