begin var n := ReadlnInteger('n = '); var m := ReadlnInteger('m = '); var rand := ReadlnInteger('Для ручного ввода нажмите 0');
if rand = 0 then begin a := new integer[m, n]; for var i := 0 to m-1 do for var j := 0 to n-1 do a[i, j] := ReadlnInteger('a[' + i + ',' + j + '] = '); end else a := MatrixRandom(m, n, 1, 100); Println(a);
var b := ArrGen(n, x -> 1); for var i := 0 to m-1 do for var j := 0 to n-1 do if j mod 2 = 0 then b[j] := b[j] * a[i, j];
b.Where((x, i)-> i mod 2 = 0).SortedDescending().Println(); end.
2. процессор-микропроцессор, который выполняет задачи, алгоритмы, управляя компьютером. системный блок-большая коробка, корпус, в котором находятся все комплектующие компьютера. 3. это конечная последовательность однозначных предписаний, исполнение которых позволяет с конечного числа шагов получить решение задачи, однозначно определяемое исходными данными. 4.стационарный или подвижный объект, который представляет собой комплекс технических средств обработки информации, предназначенный для выполнения определенных функций
0100 1011
0010 1101
0001 1110
0110 1001
0011 1100
0101 1010
0111 1000