ТутРешу.Ру

Написать программу нахождения суммы первого столбца двумерного массива

Задание:

Написать программу нахождения суммы первого столбца двумерного массива

Решение:

var a: array[1… 10, 1… 10] of integer; i, j, n, m, s: integer; begin read (n, m); for i: =1 to n do for j: =1 to m do begin read (a[i, j]); if (j=1) then s: =s+a[i, j]; end; writeln (s); end.




Знаете другой ответ?

Отправить свой ответ