Prolog：用户插入int输入并根据其大小检查输入

Question

最近我参加了一些关于AI和逻辑的研讨会，并开始学习prolog。有一个简单的c ++程序，我希望用prolog创建它的逻辑。顺序是：

1）用户插入整数输入（例如：3）。

2）提示用户输入3个id，其大小必须为5和整数（例如：11111,22222,333A）

3）如果输入多于或少于5或不是整数，则它将失败。

所以，我已经做了一些研究和辅导，因为我刚开始自己​​学习prolog，但是我似乎找不到正确的答案。我试过几次，但总是有错误。请帮我。我非常感谢你的帮助。谢谢

p / s：这不是功课。这只是我想学习和尝试的东西。感谢你。

Answer 1

真的很简单吗？

'prompt user'(A,B,C) :- maplist('size must be 5 and integer', [A,B,C]).
'size must be 5 and integer'(N) :- read(N), integer(N), N >= 10**4, N < 10**5.

5 ?- 'prompt user'(A,B,C).
|: 1111.
false.

6 ?- 'prompt user'(A,B,C).
|: 11111.
|: 21222.
|: 99999.
A = 11111,
B = 21222,
C = 99999.