Найти сумму элементов массива в заштрихованной области двумерного массива

@Disa · Регистрация: 30.11.2009

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

1.Найти сумму элементов массива в заштрихованной области двумерного массива.

Название: массив вверх.jpg
Просмотров: 71

Размер: 3.2 Кб

@кот Бегемот · 15.12.2009, 00:54

Pascal

var
a:array[1..100,1..100]of integer;
i,j,sum,n:integer;
begin
readln(n);
randomize;
for i:=1 to n do
for j:=1 to n do
a[i,j]:=random(20);
for i:=1 to n do
begin
for j:=1 to n do
write(a[i,j]:3);
writeln;
end;
for i:=1 to n do
for j:=1 to n do
if (j>=i) and (j<=n+1-i)then sum:=sum+a[i,j];
writeln(sum);
readln;
end.

@Disa · 15.12.2009, 01:02 **[ТС]**

alexevt,
спасибо, большое.

@Disa 2 / 2 / 0 Регистрация: 30.11.2009 Сообщений: 88
		1
	Найти сумму элементов массива в заштрихованной области двумерного массива 15.12.2009, 00:30. Показов 2158. Ответов 2 Метки нет (Все метки) 1.Найти сумму элементов массива в заштрихованной области двумерного массива. 0

@Disa 2 / 2 / 0 Регистрация: 30.11.2009 Сообщений: 88
	15.12.2009, 01:02 [ТС]	3
	alexevt, спасибо, большое. 0

Опции темы

Найти сумму элементов массива в заштрихованной области двумерного массива

Решение