Вопрос от пользователя: Петраня
Дан двумерный массив размером найти мин. элемент найти количество элементов равных этому во всем масиве
Ответ: Аврора
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]
Предыдущая запись Правила поведения в общественных местах (10 правил в конкретном месте например в кино, театре, на улице и т. д.)
Следующая запись N (Al) = 2,304 Найти: Ню (Al)
