简单的prolog函数，计算面积

Question

您好我是prolog的新手，我需要编写一个名为rect_area(Width, Height, Area)的函数来计算矩形的面积，例如：

?- rect_area(2, 3, A).

A = 6.

这是我的尝试：

rect_area(Width, Height, Area):-
    read(Width), read(Height),
    Area is Width * Height, write(Area),nl.

但它不起作用。我运行它并在监听器中输入

?- rect_area(2, 3, A).

不返回。

我不知道为什么会这样。如何解决？

Answer 1

如果您提供宽度和高度，则不需要read它们。你可能不需要打印区域;它会绑定到值并在rect_area完成时报告。