Составить программу нахождения суммы элементов, лежащих ниже главной диагонали

@munital · Регистрация: 10.12.2012

Помогите пожайлуста

Дана матрица 7*7. Составить программу нахождения суммы элементов , лежащих ниже главной диагонали

@hwmlex · 30.05.2013, 15:02

Pascal

var
a: array[1..7,1..7] of integer;
s: longint;
i,j: integer;
begin
for i:=1 to 7 do
 for j:=1 to 7 do
  if (i<j) then inc(s,a[i,j]);
writeln(s);
end.

@munital 0 / 0 / 0 Регистрация: 10.12.2012 Сообщений: 23
		1
	Составить программу нахождения суммы элементов, лежащих ниже главной диагонали 30.05.2013, 14:24. Показов 1618. Ответов 1 Метки нет (Все метки) Помогите пожайлуста Дана матрица 7*7. Составить программу нахождения суммы элементов , лежащих ниже главной диагонали 0

Опции темы

Составить программу нахождения суммы элементов, лежащих ниже главной диагонали

Решение