如何读取包含"name grade"的数据文件并计算剪辑中的 GPA

Question

如何在读取文件后计算片段中的GPA文件是:A 10 9 13 7

b 12 3 10 14

c 8 10 12 10

d 15 8 14 9

输出:A (10 9 13 7) 9.75

b (12 3 10 14) 9.75

Answer 1

使用open函数打开文件。您可以使用readline函数获取一行数据，然后使用explosion $、nth$和rest$函数获取名称和成绩列表。下面是一个从标准输入读取而不是从文件读取的示例:

CLIPS (6.4 2/9/21)
CLIPS> (bind ?i (readline))
a 10 9 13 7
"a 10 9 13 7"
CLIPS> (bind ?i (explode$ ?i))
(a 10 9 13 7)
CLIPS> (nth$ 1 ?i)
a
CLIPS> (bind ?grades (rest$ ?i))
(10 9 13 7)
CLIPS>