Page 40 - 4800
P. 40
work(„Петренко”, 101,300).
work(„Маслов”, 101,200).
Предикат show_sum дає можливість ввести номер потрібного відділу і
забезпечити потрібний розрахунок, звернувшись до предиката find_sum().
Предикат find_sum() на основі фактів бази work() формує список окладів
співробітників відділу – Lmany, обчислює суму елементів списку і їхню кількість,
виводить отримані дані разом з обчисленим середнім значенням на екран.
Суму елементів списку знаходить предикат sum_list. Він же підраховує число
елементів у списку.
У предикаті sum_list реалізована рекурсивна процедура, аналогічна тій, що була
використана при описі процедури пошуку довжини списку.
4.6. Зміст звіту з лабораторної роботи
1. Вказати номер, тему й мету лабораторної роботи.
2. В програмі, розробленій в роботі № 2, забезпечити можливість компонування
даних у список (з використанням предикату findall()) з метою їх подальшої обробки
(обчислення кількості елементів, проведення дій над елементами і т.п.).
3. У звіті навести текст та результати роботи програми.
40