Вопрос по информатике:
Дана целочисленная матрица А размером М х N, где М и N вводятся с клавиатуры. Сформировать одномерный массив В, где В[i] равно сумме элементов кратных
трем в i-ой строке. Если таких элементов нет, то В[i] равно -10.
Двумерные массивы
- 15.04.2018 19:14
- Информатика
- remove_red_eye 4580
- thumb_up 13
Ответы и объяснения 1
Var
A : array[1..100,1..100] of Integer;
B : array[1..100] of Integer;
M,N,s,i,j : Integer;
Begin
Readln(M,N);
For i:=1 to M do
Begin
s:=0;
For j:=1 to N do
Begin
A[i,j]:=Random(100);
Write(A[i,j]:4);
If A[i,j] mod 3 = 0 then s:=s+A[i,j];
end;
If s=0 then B[i]:=-10 else B[i]:=s;
Writeln(' ',B[i]);
end;
end.
- 16.04.2018 13:45
- thumb_up 51
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.