id:selvaggio:20070421:1177177934より出題。 ○○○ × ○○ ----------- ○○○零○ただし、零＝0 さあ、Prologの出番だ。 ?- use_module(library(bounds)). product(A,B,C,D,E,F,G,H,I) :- Digits = [A,B,C,D,E,F,G,H,I], Digits in 1..9, all_different(Digits), A…