Для каждой строки двумерного массива D вычислить сумму элементов столбцов с четными номерами

@N4yton · Регистрация: 18.11.2015

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

Для каждой строки двумерного массива D вычислить сумму элементов колонок с четными номерами

@JuriiMW · 23.11.2015, 07:45

Pascal

uses Arrays;
 
begin
  var Rows := ReadLnInteger('  Строк =');
  var Cols := ReadLnInteger('Колонок =');
  Randomize;
  var D := CreateRandomIntegerMatrix(Rows, Cols, 0, 9);
  D.Write;
  for var Row := 0 to Rows-1 do
    begin
      var S := 0; for var Col := 0 to Cols-1 do if odd(Col) then S += D[Row, Col];
      WriteLnFormat('S({0}) = {1}', Row+1, S);
    end;
end.

@N4yton 1 / 1 / 0 Регистрация: 18.11.2015 Сообщений: 33
		1
	Для каждой строки двумерного массива D вычислить сумму элементов столбцов с четными номерами 20.11.2015, 19:44. Показов 1209. Ответов 1 Метки нет (Все метки) Для каждой строки двумерного массива D вычислить сумму элементов колонок с четными номерами 0

Опции темы

Для каждой строки двумерного массива D вычислить сумму элементов столбцов с четными номерами

Решение