Опубликовано 6 лет назад по предмету Информатика от zzzbartozz

Дана квадратная целочисленная матрица порядка n. Сформировать результирующий одномерный массив, элементами которого являются построчные средние арифметические значения нечетных элементов исходной матрицы. Задача на Pascal.

Ответ

Ответ дан Аккаунт удален

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018Внимание! Если программа не работает, обновите версию!begin var n:=ReadInteger('Количество строк/столбцов в матрице:'); Writeln('*** Исходная матрица ***'); var a:=MatrRandom(n,n,-99,99); a.Println(4); Writeln(n*4*'-'); var b:=a.Rows.Select(row->row.Where(t->t.IsOdd).DefaultIfEmpty.Average) .ToArray; b.Println;end.ПримерКоличество строк/столбцов в матрице: 5*** Исходная матрица *** 40 -38 16 -70 26 87 7 -31 99 34 -34 -47 -33 32 56 66 71 41 7 80 55 42 -22 7 86--------------------0 40.5 -40 39.6666666666667 31