profile
Опубликовано 5 лет назад по предмету Информатика от zzzbartozz

Дана квадратная целочисленная матрица порядка n. Сформировать результирующий одномерный массив, элементами которого являются построчные средние арифметические значения нечетных элементов исходной матрицы. Задача на Pascal.

  1. Ответ
    Ответ дан Аккаунт удален
    PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
    Внимание! Если программа не работает, обновите версию!

    begin
      var n:=ReadInteger('Количество строк/столбцов в матрице:');
      Writeln('*** Исходная матрица ***');
      var a:=MatrRandom(n,n,-99,99);
      a.Println(4); Writeln(n*4*'-');
      var b:=a.Rows.Select(row->row.Where(t->t.IsOdd).DefaultIfEmpty.Average)
        .ToArray;
      b.Println;
    end.

    Пример
    Количество строк/столбцов в матрице: 5
    *** Исходная матрица ***
      40 -38  16 -70  26
      87   7 -31  99  34
     -34 -47 -33  32  56
      66  71  41   7  80
      55  42 -22   7  86
    --------------------
    0 40.5 -40 39.6666666666667 31
Самые новые вопросы