Список студентов с оценками: найти сумму балов и среднее арифметическое - Prolog

Формулировка задачи:

Всем привет, по заданию дан список студентов и их оценки по предметам, мне надо найти сумму балов и среднее арифметическое. student (4151, petrov, [physics/5, mathematics/4, c++/5, oop/3]). student(4152, veselkov, [physics/4, mathematics/3, c++/4, oop/5]). Сумму так пробывал искать:
sum_list([H|T],Sum):- sum_list(T,Sum1), Sum is(H+Sum1),Sum/4>0,write(Sum),nl.

Код к задаче: «Список студентов с оценками: найти сумму балов и среднее арифметическое - Prolog»

textual
sum_list([_/M],1,M).
sum_list([_/M|T],N,S):-sum_list(T,N1,S1),
                                N is N1+1,S is S+M.

10   голосов, оценка 4.300 из 5


СОХРАНИТЬ ССЫЛКУ
Похожие ответы