Вопрос по информатике:
СРОЧНО. Задание в PascalABC.
В двумерном массиве размерностью N на M найти сумму положительных чётных элементов, меньших 10.
- 18.06.2018 22:38
- Информатика
- remove_red_eye 13911
- thumb_up 14
Ответы и объяснения 1
Var
a: array [1..10000,1..10000] of integer;
c,s,b,n,m: integer;
begin
readln (n,m);
for b:=1 to n do
for c:=1 to m do
readln (a[b,c]);
for b:=1 to n do
for c:=1 to m do
if ((a[b,c] 0)) then s:= s+a[b,c];
writeln (s);
end.
- 19.06.2018 11:56
- thumb_up 39
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.