Вопрос по информатике:
Заданий двовимірний масив A[n][m] цілих чисел. Складіть програму підрахунку кількості елементів, значення яких співпадають з сумою їх індексів.
Язык-Pascal. Помогите пожалуйста!
- 25.11.2017 04:36
- Информатика
- remove_red_eye 6268
- thumb_up 23
Ответы и объяснения 1
Const n=10; m=12;
var b:array[1..n,1..m] of integer;
i,j,k:integer;
begin
k:=0;
for i:=1 to n do
for j:=1 to n do b[i,j]:=random(30)-10;
for i:=1 to n do begin
for j:=1 to n do write(b[i,j]:5);
writeln;
end;
for i:=1 to n do
for j:=1 to n do
if b[i,j]=i+j then k:=k+1;
write ('количество искомых элементов ',k);
writeln;
end.
- 26.11.2017 09:25
- thumb_up 21
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.