Среди элементов четных строк массива определить K — количество отрицательных элементов

@Nucky89 · Регистрация: 27.02.2012

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

Добрый день.Помогите, пожалуйста, решить задачу.

Дан массив X(N,M). Среди элементов четных строк массива определить K - количество отрицательных элементов.

И подскажите, пожалуйста, как строить блок-схему.

@Ev[G]eN · 12.03.2012, 16:04

Pascal

const
  n = 5;
var
  Matr: array[1..n, 1..n] of integer;
  Count: integer;
  i, j: byte;
begin
  randomize;
  writeln('      Матрица: ', '       Кол-во отрицательных: ');
  for i:=1 to n do
  begin
    Count:=0;
    for j:=1 to n do
    begin
      Matr[i, j]:=random(20)-10;
      write(Matr[i, j]:4);
      if (i mod 2 = 0) and (Matr[i, j] < 0) then inc(Count);
    end;
    if i mod 2 = 0 then write(Count:10);
    writeln;
  end;
end.

@Nucky89 0 / 0 / 0 Регистрация: 27.02.2012 Сообщений: 6
		1
	Среди элементов четных строк массива определить K — количество отрицательных элементов 12.03.2012, 15:58. Показов 1310. Ответов 1 Метки нет (Все метки) Добрый день.Помогите, пожалуйста, решить задачу. Дан массив X(N,M). Среди элементов четных строк массива определить K - количество отрицательных элементов. И подскажите, пожалуйста, как строить блок-схему. 0

	12.03.2012, 16:04

Среди элементов четных строк массива определить K — количество отрицательных элементов

Решение