Есть ответ 👍

Составить программу. дан массив n*m. определить сумму положительных элементов

101
190
Посмотреть ответы 2

Ответы на вопрос:


Var a: array [1..100,1..100] of longint; i,j,k,n,m: longint; 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     if a[i,j]> 0 then inc(k,a[i,j]); writeln(k); end.
25409
4,4(69 оценок)

Информация для человека - источник новостей. с информации человек имеет представление о ком - либо или о чем - либо.

Популярно: Информатика