... Bài tập thực hành BProlog 1. Viết vị từ demchan đếm trên một danh sách có bao nhiêu phần tử là số chẵn. ... n_ptdau(N,[H|T],[H|T1],L2):-n_ptdau(M,T,T1,L2),N is M+1. 4. Viết vị từ ptg in ra phần tử giữa trong danh sách số nguyên dương, trả về 0 nếu số phần tử của danh sách là số chẵn. Vd: ptg([4,9,6,5,2],X) X=6 ptg([4,9,5,2],X) ... K1+1,ptn([A|B],K2,C),!. ptg([A|B],0):-dem([A|B],K),(K mod 2) =:= 0,!. 5. Viết vị từ hoi, hieu, giao thực hiện phép hội, hiệu và giao trên hai danh sách Vd: hoi([1,2,3,4,5],[3,4,5,6,7,8],X) X=[1,2,3,4,5,6,7,8]...