Описать процедуру Smooth1(A, N), выполняющую сглаживание вещественного массива

Описать процедуру Smooth1(A, N), выполняющую сглаживание вещественного массива A размера N следующим образом: элемент Ak заменяется на среднее арифметическое первых k исходных элементов массива A. Массив A является входным и выходным параметром. С помощью этой процедуры выполнить пятикратное сглаживание данного массива A размера N, выводя результаты каждого сглаживания.