Написать программу в паскале.как можно !
задана квадратная матрица a размером n x n (n< =10), со-стоящая из действительных элементов. найти среднее арифметическое элементов каждой из четных строк этой матрицы.

begin

var n := ReadInteger;

var a := MatrRandom(n, n, -99, 99);

a.Println(4);

var arow := ArrGen(n div 2, 1, t -> t + 2);

var acol := ArrGen(n, t-> t);

a.MatrSlice(arow, acol).Rows.Select(t -> t.Average).PrintLines;

end.

На паскальабц.нет