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

СРОЧНО
Создать двумерный массив случайных чисел array[1..N,1..M] от 1 до 5, и найти столбец с минимальной суммой и строчку с максимальной.

  1. Ответ на вопрос
    Ответ на вопрос дан A1dar
    const
      n = 5;
      m = 5;
    var
      a: array[0..n, 0..m] of integer;
      i, j, imin, jmax: integer;
    begin
      writeln('Матрица: ');
      for i := 1 to n do
      begin
        for j := 1 to m do
        begin
          a[i, j] := Random(5) + 1;
          a[0, j] := a[0, j] + a[i, j];
          a[i, 0] := a[i, 0] + a[i, j];
          write(a[i, j] : 3);
        end;
        writeln;
      end;
      jmax := 1;
      for i := 2 to n do
        if a[i, 0] > a[jmax, 0] then
          jmax := i;
      imin := 1;
      for j := 2 to m do
        if a[0, j] < a[0, imin] then
          imin := j;
      writeln('Номер столбца: ', imin);
      writeln('Номер строки: ', jmax);
    end.
    1. Ответ на вопрос
      Ответ на вопрос дан Аккаунт удален
      А я решил на процедурах сделать, потому что скоро в АВС будут расширения для матриц, как есть для векторов. И срезы типа a.row(i), a.Column(j)
    2. Ответ на вопрос
      Ответ на вопрос дан Аккаунт удален
      И достаточно будет писать a.Row(i).Max ))
    3. Ответ на вопрос
      Ответ на вопрос дан A1dar
      А не легче ли сразу добавить что-то типо a.RowMax?
    4. Ответ на вопрос
      Ответ на вопрос дан A1dar
      a.RowMax(i: integer)
    5. Ответ на вопрос
      Ответ на вопрос дан Аккаунт удален
      Я как раз сейчас и занимаюсь определением того, что надо добавить. Если у разработчика конференцию почитаете, там мне предложили дать набор таких функций.
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 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) их не спросили

Информация

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