begin
var n:=ReadInteger ('Количество строк в массиве:');
var m:=ReadInteger ('Количество столбцов в массиве:');
Writeln ('*** Исходный массив [',n,',',m,'] ***');
var a:=MatrRandom (n,m,-99,99);
a.Println(4); Writeln (4*a.ColCount*'-');
Writeln ('Кол-во положительных: ',a.ElementsByRow.Where(x->x>1).Count)
end.
Пример
Количество строк в массиве: 5
Количество столбцов в массиве: 12
*** Исходный массив [5,12] ***
-64 16 -1 59 -63 -37 -54 28 -40 39 17 -84
89 8 38 56 -51 20 49 28 -90 -85 1 81
13 52 -10 15 28 -95 76 -77 -54 -27 33 -9
22 43 -40 14 58 19 -75 26 92 94 -59 87
-95 -8 65 -24 -50 62 26 -79 -85 18 -54 -16
Кол-во положительных: 32
алгоритм — это предназначенное для конкретного исполнения точное описание последовательности и действий, направленных на решение поставленной .
свойства алгоритма.
дискретность — разделение алгоритма на последовательность шагов.
результативность — получение из исходных данных результата за конечное число шагов.
массовость — возможность применения алгоритма к большому количеству различных исходных данных.
детерминированность (определенность) — исполнитель должен выполнять команды алгоритма в строго определенной последовательности.
выполнимость и понятность — алгоритм должен содержать команды, входящие в систему команд исполнителя и записанные на понятном исполнителю языке.
