решите мне пожалуйста задачки, нужно сдать зачет по информатике

[Даль]

выполнить обработку элементов прямоугольной матрицы а, имеющей N строк и м столбцов. просуммировать элементы каждой строки матрицы с соответствующими элементами L-той строки
2. дан одномерный массв числовых значений, насчитывающий N элементов. удалить из массива элемент с номером к

[somewhere]

Код: Выделить всё

const N = 10

var A : Array[1..N] of Real;
      K : Integer;
begin
Readln(K);
If K<N then move(A[K+1], A[K], SizeOf(A[1])*(N-K));
end.