Задание в ворде с рисунком. прикрепите файлом

Бегин

вар n:=ReadInteger('Количество хромосом/кол-во подбородков:');

врайтэлен там сам дальше.

 вар a:=MatrRandom(n,n,-99,99);

 a.Println(4); Врайтлн(n*4*'-');

вар типо кушать варишь b:=a.Rows.Select(row->row.Where(t->t.IsOdd).DefaultIfEmpty.Average)

   .Toаррай;

 b.Println;

энд типо конец.

Пример

Количество сам найдёшь/столбцов в матрице: около 5-20 там по месецам нужно смотреть.

*** Исходная попа (нужно сначало её помыть, потом начинать работу) ***

 40 -38  16 -70  26 50 21 43 1323 123  123

 87   7 -31  99  34 345 345 645 645 64 645

-34 -47 -33  32  56 456 4564 6 46 54 6456

 66  71  41   7  80 456 4564 6456 45  64

 55  42 -22   7  86 45645 4  456 45 64 46

0 40.5 -40 39.6666666666667 3112 312312 3123

Объяснение:

.