Решить задачу в Pascal (желательно с объяснением)

#include < iostream> /*заголовочный файл, который отвечает за потоковый ввод/вывод (cout/cin).*/ #include < cstdlib> /*заголовочный файл, подключается для функции */ using namespace std; /*пространство имен std. все имена  стандартных  функций расположены именно в этом пространстве имен.   */ int main() { //начало главной программы. int n; /*количество чисел в массиве а и b.*/ float sum=0; //переменная, которая отвечает за сумму. cout< < "vvedite n: "; /*ввод количества элементов массива. (тут ошибка, если вы хотите вводить количество элементов массива, вам нужно использовать динамическое выделение памяти. то  есть, float *a = new float [n], тогда эти две строки пойдут. а так лучше задать константную размерность  двух массивов (const int n = 10 (*/ cin> > n; float a[n+1], b[n+1]; /*массивы.*/ /*теперь идет запись элементов в массив a, индекс пробегает по каждому  элементу массива записывает значение, которое вводит пользователь.*/ for (int i=1; i< =n; i++){ system("cls"); /*очищение консоли (экрана).*/ cout< < "vvedite "< < i< < "-e chislo massiva a: "; /*на экран выбивает сообщение пользователю, что бы он ввел  с клавиатуры значения a[i] элемента.*/  cin> > a[i]; /*ввод значения с клавиатуры.*/ sum+=a[i]; /*добавление элемента к сумме. (sum = sum+a[i])*/ b[i]= sum/i; /*запись в массив b. */ } system("cls"); /*очищение экрана.*/   /* вывод массива b. */ cout< < "b = ["; { for (int i=1; i< n; i++) cout< < b[i]< < ", "; } cout< < b[n]< < "] ";   system("pause"); /*если не будет этой строчки, экран (консоль) будет сразу же закрываться. вы не успеете ничего прочитать.*/ return 0; /*используется для возврата значения (так как main типа int).*/ }