Вопрос по информатике:

Напишите пожалуйста программу на Pascal ABC Net, суть которой заключается в том, что человек должен написать ввести N чисел, после чего программа должна посчитать среднее арифметическое, которое округлено до целых чисел (round) и это среднее арифметическое должно быть умножено на самое маленькое число, введенное человеком и из всего этого вычитаем самое большое число, введённое человеком.
Формула: , где t - это сумма введённых чисел, человеком, d-это количество чисел, введённых человеком, min-самое маленькое число, которое было введено человеком и max-это самое максимальное число, которое было введено человеком!! ЕСЛИ В РЕЗУЛЬТАТ ПО ЭТОЙ ФОРМУЛЕ ПОЛУЧАЕТСЯ ОТРИЦАТЕЛЬНЫЙ, ТО МЫ УМНОЖАЕМ ЕГО НА -1