Viết chương trình pascal giải bài toán sau: Yêu nhau cau 6 bổ 3, Ghét nhau cau 6 bổ ra làm 10, Mỗi người mỗi việc trăm người, Có 17 quả hỏi người ghét, yêu