Вопрос от пользователя: Петраня
Дан двумерный массив размером найти мин. элемент найти количество элементов равных этому во всем масиве
Ответ: Аврора
Var i, j, k, min:integer;
a:array[1 … 10,1 … 10] of integer;
begin
randomize;
for i:=1 to 10 do
for j:=1 to 10 do
a[i, j]:=random (15) + 1;
min:=a[1,1];
for i:=1 to 10 do
for j:=1 to 10 do
if a[i, j]
