Подсчитать количество чётных чисел в каждой строке массива

@Aleksei200025 · Регистрация: 01.02.2016

Author24 — интернет-сервис помощи студентам

1) Дан массив С(N,N). Подсчитать: а). Количество чётных чисел в каждой строке массива. б). Количество отрицательных чисел в каждом столбце массива. в). Количество элементов, расположенных на главной диагонали, значения, которых кратны трём г). сумму элементов, значения которых кратных пяти и расположенных на побочной диагонали.

@Gamayun · 05.04.2016, 16:27

а)

Pascal

     For i:=1 to n do
       for j:=1 to n do
        begin
          if ((C[i,j]) mod 2)=0 then
            a:=a+1;                  //завести заранее обнулённую
          if j=n then
             begin
               write(a,',  ');
               a:=0;   
             end;
          end;

б) аналогично, но уже по i

в)

Pascal

      for i:=1 to n do
         for j:=1 to n do
            if i=j then
              if ((C[i,j] mod 3)=0) then
                 a:=a+1;

г)

Pascal

      a:=0;
      for i:=1 to n do
         for j:=1 to n do
            if i=j then
              if ((C[j,i] mod 5)=0) then
                 a:=a+C[j,i];

@Aleksei200025 0 / 0 / 0 Регистрация: 01.02.2016 Сообщений: 61
		1
	Подсчитать количество чётных чисел в каждой строке массива 03.04.2016, 20:43. Показов 1328. Ответов 1 Метки нет (Все метки) 1) Дан массив С(N,N). Подсчитать: а). Количество чётных чисел в каждой строке массива. б). Количество отрицательных чисел в каждом столбце массива. в). Количество элементов, расположенных на главной диагонали, значения, которых кратны трём г). сумму элементов, значения которых кратных пяти и расположенных на побочной диагонали. 0

	05.04.2016, 16:27

Подсчитать количество чётных чисел в каждой строке массива

Решение