оба задания 1) упорядочить одномерный вещественный массив из 20 элементов по убыванию методом перебора.
2) Сформировать вещественную матрицу 5х5. Вычислить произведение отрицательных элементов, находящихся над и под главной диагональю матрицы.
Язык С++
// Внимание! Если программа не работает, обновите версию!
begin
var a:=SeqRandomInteger(30,-50,50).Select(x->1.2*x).ToArray;
a.Println;
var m:=a.Average;
var b:=a.Where(x->x<m).ToArray; b.Println
end.
Пример
27.6 -40.8 50.4 -14.4 -46.8 9.6 7.2 -36 -32.4 -60 -30 38.4 -2.4 -55.2 -43.2 -39.6 1.2 -52.8 -38.4 34.8 -45.6 -12 15.6 -55.2 4.8 13.2 -1.2 -40.8 -33.6 -19.2
-40.8 -46.8 -36 -32.4 -60 -30 -55.2 -43.2 -39.6 -52.8 -38.4 -45.6 -55.2 -40.8 -33.6 -19.2