Найти сумму частей в двумерном массиве

Отыскать сумму частей в двумерном массиве

Задать свой вопрос
1 ответ
Var
i,j,n,m,sum:integer;
a:array[1..1000, 1..1000] of integer;
begin
Readln(n,m);
for i:= 1 to n do
  for j:= 1 to m do
    Read(a[i,j]);
for i:= 1 to n do
  for j:= 1 to m do
    sum:= sum+a[i,j];
Writeln(sum);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт