Найти одномерный массив В из сумм элементов каждой строки матрицы - PascalABC.NET

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

написать программу в турбо паскале, помогите!!!!! Дана Матрица А(5.4) 1)Найти одномерный массив В из сумм элементов каждой строки матрицы 2)найти максимальный элемент матрицы А в 5-ой строке 3)Заменить последний элемент в 3-ей строке матрицы А на найденый максимальный элемент

Решение задачи: «Найти одномерный массив В из сумм элементов каждой строки матрицы»

Листинг программы

begin
  For i:=1 to 5 do
  Begin
   For j:=1 to 4 do
    Begin
     A[i,j]:=random(9)+10;
     write(A[i,j]:3);
    End;
   writeln;

Объяснение кода листинга программы

Создается цикл for для перебора строк матрицы от 1 до 5
В каждой строке создается вложенный цикл for для перебора столбцов от 1 до 4
В каждой ячейке матрицы (i,j) генерируется случайное число от 10 до 19 (random(9)+10)
Сгенерированное число присваивается элементу матрицы A[i,j]
С помощью функции write выводится значение элемента A[i,j] с точностью до 3 знаков после запятой
После вывода всех элементов строки, выводится символ новой строки (writeln)
После завершения вложенных циклов, выводится символ новой строки (writeln)