Ответы на вопрос:
// pascalabc.net 3.2, сборка 1399 от 08.03.2017 // внимание! если программа не работает, обновите версию! procedure cheburek(s: string); begin var n: =readinteger('количество строк в матрице: '); var m: =readinteger('количество столбцов в массиве: '); writeln('*** ',s,' матрица [',n,',',m,'] ***'); var a: =matrrandom(n,m,-99,99); a.println(4); writeln(4*a.colcount*'-'); var s1: ='сортированный вектор ср.значений нечетных столбцов'; writeln(s1); a.cols.select(x-> x.average).where((x,i)-> i.iseven).sorted.println; writeln(s1.length*'-'); end; begin cheburek('первая'); cheburek('вторая'); end. пример количество строк в матрице: 4 количество столбцов в массиве: 8 *** первая матрица [4,8] *** 98 -64 -30 84 -6 11 4 7 -45 23 55 47 67 87 70 -64 40 20 91 -27 -12 42 -49 10 -59 -79 5 -77 -59 -44 -4 -10 сортированный вектор ср.значений нечетных столбцов -2.5 5.25 8.5 30.25 количество строк в матрице: 6 количество столбцов в массиве: 11 *** вторая матрица [6,11] *** -98 -40 -42 81 39 28 -3 -24 -33 79 13 22 26 -79 90 93 46 94 83 -1 -13 -18 -21 -44 85 60 43 -26 -94 -19 -34 99 -72 -35 46 8 30 88 -4 -87 -76 15 -94 9 -70 29 83 -79 -69 12 -24 -53 -27 96 -97 19 80 -98 96 79 84 -76 -29 85 14 14 сортированный вектор ср.значений нечетных столбцов -31.6666666666667 -30.5 -25.1666666666667 -7.16666666666667 0.833333333333333 45.5
Популярно: Информатика
-
danilabarsap02au231.07.2022 08:09
-
sms2988985526.10.2020 17:14
-
НаsтяПоможет77726.01.2022 09:17
-
mashaaa9809.09.2022 23:08
-
fbejgiwndkgk06.09.2020 18:05
-
gorkylush29.05.2021 04:49
-
Bon200017.12.2020 05:21
-
29Vladislava1301.06.2023 09:37
-
kiscaki06.05.2023 22:02
-
Garri1427.03.2020 20:14