Написать программу для подсчета количества отрицательных элементов двумерного массива...

Question

Написать программу для подсчета количества отрицательных элементов двумерного массива кратных трём в pascal ABC

Comments

могу дать алгоритм подсчета в простом паскале, он должен подойти и для ABC

---

давай0

Answer 1

Ответ:

Объяснение:

Описание массива и переменной количества:

var

 a:array[1..n, 1..m] of integer;

 count:integer;

 i, j:integer;

Сам фрагмент программы:

 count:=0;

 for i:=1 to n do

   for j:=1 to m do

     if ((a[i, j]<0) and ((a[i, j] mod 3) = 0)) then count:=count+1;</p>