Заполнить двухмерный массив состоящий из 5x5 элементов, случайными числами в диапазоне от 0 до 100. Сформировать одномерный массив, состоящий из минимальных элементов строк исходного и """сортировать его по убыванию."""
Помогите сделать сортировку по убыванию!
program n_4c;
var
i, j:integer;
a:array[1 ... 5,1 ... 5] of integer;
b:array[1 ... 5] of integer;
begin
randomize;
for i:=1 to 5 do
b[i]:=101;
for i:=1 to 5 do
begin
for j:=1 to 5 do
begin
a[i, j]:=random (100) + 1;
write (a[i, j],' ') ;
end;
writeln;
end;
for i:=1 to 5 do
for j:=1 to 5 do
begin
if a[i, j] end;
writeln;
for i:=1 to 5 do
writeln (b[i]) ;
readln;
end.
Ответы (1)
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Заполнить двухмерный массив состоящий из 5x5 элементов, случайными числами в диапазоне от 0 до 100. Сформировать одномерный массив, ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы