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

В двумерной матрице A(N, M), состоящей из произвольных чисел, определить номера столбцов, в которых среднее арифметическое его элементов меньше чем среднее арифметическое элементов массива.

  1. Ответ на вопрос
    Ответ на вопрос дан Аккаунт удален
    var
      i,j,n,m:integer;
      s:real;
      a:array[0..1000,1..1000] of real;
    begin
    readln(n,m);
    randomize;
    s:=0;
    for i:=1 to n do
      begin
      for j:=1 to m do
            begin
            a[i,j]:=random(10);
            s:=s+a[i,j];
            write(a[i,j],' ')
            end; 
      writeln
      end;
    s:=s/n/m;
    writeln;
    for j:=1 to m do
      begin 
      for i:=1 to n do a[0,j]:=a[0,j]+a[i,j];
      a[0,j]:=a[0,j]/n;
      if a[0,j]<s then write(j,' ')
      end
    end.
  2. Ответ на вопрос
    Ответ на вопрос дан archery
    var
        i, j, n, m: integer;
        s, t: real;
        a: array[1..100, 1..100] of integer;

    begin
        randomize;
       
        readln(n, m);
       
        for i := 1 to n do
        begin
            for j := 1 to m do
            begin
                a[i, j] := random(100);
                s := s + a[i, j];
                write(a[i, j]:3, ' ')
            end;
            writeln()
        end;
       
        s := s / n / m;
       
        writeln();
        for j := 1 to m do
        begin
            t := 0;
            for i := 1 to n do
                t := t + a[i, j];
               
            if t / n < s then
                write(j, ', ')
        end
    end.

Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
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) их не спросили

Информация

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