10/02/04 20:58:20
>>515
使用言語：J
g=:(0=3&|)+.(3 e. 10&#.inv)
f=:[:;{&('NO';'YES')
f g 11
NO
f g 12
YES
f g 13
YES
10/02/04 20:58:20
>>515
使用言語：J
g=:(0=3&|)+.(3 e. 10&#.inv)
f=:[:;{&('NO';'YES')
f g 11
NO
f g 12
YES
f g 13
YES
10/02/04 20:58:20
>>515
使用言語：J
g=:(0=3&|)+.(3 e. 10&#.inv)
f=:[:;{&('NO';'YES')
f g 11
NO
f g 12
YES
f g 13
YES