>>364
3つの組5550996791340通りの選び方に加えて加法の組み合わせが100通りあるので
555099679134000の照合作業が必要で総当たりは無理。
サンプリングで体感してみることにする。30個を10個ずつA,B,Cに分けるとして
sim <- function(verbose=FALSE){
A=sample(30,10)
A
BC=(1:30)[-A]
iB=sample(20,10)
B=BC[iB]
C=BC[-iB]
gr=expand.grid(A,B)
AB=mapply(sum, gr[,1],gr[,2])
if(verbose){
ab=gr[AB %in% C,]
colnames(ab)=c('A','B')
AandB=apply(ab,1,sum)
cat('A:',A,'\n')
cat('B:',B,'\n')
cat('C:',C,'\n')
print(cbind(ab,AandB))
}
invisible(any(AB %in% C))
}

> sim(T)
A: 7 19 24 22 8 23 2 13 1 6
B: 14 5 11 29 3 20 21 25 4 16
C: 9 10 12 15 17 18 26 27 28 30
A B AandB
8 13 14 27
9 1 14 15
11 7 5 12
14 22 5 27
16 23 5 28
18 13 5 18
21 7 11 18
22 19 11 30
29 1 11 12
30 6 11 17
39 1 29 30
41 7 3 10
43 24 3 27
46 23 3 26
50 6 3 9
51 7 20 27
55 8 20 28
60 6 20 26
61 7 21 28
70 6 21 27
77 2 25 27
79 1 25 26
83 24 4 28
84 22 4 26
85 8 4 12
86 23 4 27
88 13 4 17
90 6 4 10
97 2 16 18
99 1 16 17