Вычислить сумму положительных элементов, расположенных в первой строке матрицы - Turbo Pascal

Формулировка задачи:

Дана матрица A(N,M). Вычислить сумму положительных элементов, расположенных в первой строке матрицы, и произведение отрицательных элементов, расположенных в последнем столбце матрицы.

Код к задаче: «Вычислить сумму положительных элементов, расположенных в первой строке матрицы - Turbo Pascal»

textual
s:=0;
for j:=1 to m do
if a[1,j]>0 then s:=s+a[1,j];

14   голосов, оценка 3.929 из 5


СОХРАНИТЬ ССЫЛКУ