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

дана матрица А(n*m). получить вектор b1(), b2(), ...,b(n), где b(i) равно количеству отрицательных элементов в строке.

  1. Ответ на вопрос
    Ответ на вопрос дан Alphaeus

    Проверено - работает на Паскаль АВС

     

    Program mashaaq;
    uses crt;
    const n=12;
    const m=15;
    var
      a:array[1..n,1..m] of integer;
      b:array[1..n] of integer;
      i,j,minus : integer;
    begin
      Randomize;
      for i:=1 to n do
        for j:=1 to m do
          a[i,j]:= Random(101)-50; //заполняем массив случайными числами
      writeln('*** alphaues is thinking... ***');
      writeln('***          OK             ***');
      for i:=1 to n do //просматриваем строки сверху вниз
        begin
          minus:=0;
          for j:=1 to m do //просматриваем строку
            if a[i,j]<0  then minus:=minus+1; //если найден отрицательный элемент, увеличиваем счётчик minus на единицу
          b[i]:=minus; //сохраняем значение счётчика для i-й строки
        end;
      writeln;
      {выводим матрицу А и вектор результатов В}

      {в красивой рамочке :)}
      writeln('**************************************************************************');
      writeln('*                              Массив                           * Вектор *');
      writeln('**************************************************************************');
      for i:=1 to n do
        begin
          write ('* ');
          for j:=1 to m do
            write(a[i,j]:4); //выводим строку массива
          writeln('  *   ',b[i]:2,'   *');  //дописываем справа значение вектора В для этой строки
        end;  
      writeln('**************************************************************************');
    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) их не спросили

Информация

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