profile
Размещено 5 лет назад по предмету Информатика от Captain918

Заполнить двухмерный массив состоящий из 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. Ответ на вопрос
    Ответ на вопрос дан Spin17
    в разделе описаний добавь еще одну переменную с типа integer
    и вместо последних 9-ти строк твоей программы должно быть:

    {заполняем массив b минимальными элементами каждой строки}
    for i := 1 to 5 do
      begin
            for j := 1 to 5 do if a[i,j] < b[i] then b[i] := a[i,j];
            Write(b[i], ' ')
      end;
    WriteLn;
    {сортируем массив b}
    for i := 1 to 4 do
      for i+1 := 1 to 5 do
         if b[i] < b[j] then
           begin
                 c := b[i];
                 b[i] := b[j];
                 b[j] := c
           end;
    {выводим отсортированный массив на экран}
    for i := i to 5 do Write(b[i], ' ');
    WriteLn
    END.

Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 6 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.