Где чисел из диапазона 20..30 находится больше: в четных или нечетных строках?

@Programbrey · Регистрация: 22.02.2017

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

Товарищи! Я очень срочно нуждаюсь в вашей помощи. Надо решить задачу: Дан двумерный числовой массив А(4, 10) с числами в диапазоне 0..100. Где чисел из диапазона 20..30 находится больше: в четных или нечетных строках?
Спасибо, товарищи!

@Hitoku · 23.05.2017, 00:02

Pascal

const n = 4; m = 10;
var
  a: array [1..n, 1..m] of integer;
  i, j, cch, cnch: byte;
begin
  cch := 0; cnch := 0;
  for i := 1 to n do begin
    for j := 1 to m do begin
      a[i, j] := random(101);
      write(a[i, j]:4);
      if (a[i, j] >= 20) and (a[i, j] <= 30) then
        if i mod 2 = 0 then inc(cch)
          else inc(cnch);
    end;
    writeln;
  end;
  if cch = cnch then write('Поровну')
    else if cch > cnch then write('В чётных строках больше')
      else write('В нечётных строках больше');
end.

@Programbrey 0 / 0 / 0 Регистрация: 22.02.2017 Сообщений: 38
		1
	Где чисел из диапазона 20..30 находится больше: в четных или нечетных строках? 22.05.2017, 11:10. Показов 1223. Ответов 1 Метки нет (Все метки) Товарищи! Я очень срочно нуждаюсь в вашей помощи. Надо решить задачу: Дан двумерный числовой массив А(4, 10) с числами в диапазоне 0..100. Где чисел из диапазона 20..30 находится больше: в четных или нечетных строках? Спасибо, товарищи! 0

	23.05.2017, 00:02

Где чисел из диапазона 20..30 находится больше: в четных или нечетных строках?

Решение