11 / 2 / 0
Регистрация: 22.10.2013
Сообщений: 61
1

Дан двумерный массив целых чисел. Вычислить сумму элементов, расположенных на главной и побочной диагоналях

09.11.2013, 16:28. Показов 2064. Ответов 1
Метки нет (Все метки)

Дан двумерный массив целых чисел. Вычислить сумму элементов, расположенных на главной и побочной диагоналях
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.11.2013, 16:28
Ответы с готовыми решениями:

Дан двумерный массив целых чисел. Вычислить сумму элементов, расположенных на главной и побочной диагоналях
Дан двумерный массив целых чисел. Вычислить сумму элементов, расположенных на главной и побочной...

Вычислить сумму элементов, расположенных на главной и побочной диагоналях массива
Дан двумерный массив целых чисел. Вычислить сумму элементов, расположенных на главной и побочной...

Вычислить сумму элементов, расположенных на главной и побочной диагоналях матрицы
Дан двумерный массив целых чисел. Вычислить сумму элементов, расположенных на главной и побочной...

Вычислить сумму элементов, расположенных на главной и побочной диагоналях - решить с использованием процедуры
помогите сделать задачу через процедуру: const n = 6; var a : array of integer; j, i,...

1
Почетный модератор
64270 / 47569 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
09.11.2013, 17:03 2
Лучший ответ Сообщение было отмечено belanovskii как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
uses crt;
const nmax=20;
var a:array[1..nmax,1..nmax] of integer;
    n,i,j,s1,s2:integer;
begin
clrscr;
randomize;
repeat
write('Размер матрицы до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Исходная матрица:');
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=random(20);
    write(a[i,j]:3);
    if j=i then s1:=s1+a[i,j];
    if j=n-i+1 then s2:=s2+a[i,j];
   end;
  writeln;
 end;
writeln('Сумма главной  диагонали=',s1);
writeln('Сумма побочной диагонали=',s2);
readln
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
09.11.2013, 17:03
Помогаю со студенческими работами здесь

Дан двумерный массив вещественных чисел. Найти сумму элементов, расположенных выше главной диагонали
дан двумерный массив вещественных чисел.Найти сумму элементов,расположенных выше главной диагонали

Сформировать массив из элементов матрицы, расположенных на главной и побочной диагоналях
Дан динамический массив из n строк и m столбцов. Сформировать одномерный массив из элементов...

Задан двухмерный массив целых чисел А размером М на N. Найти сумму элементов, расположенных выше побочной диагонали
Помогите пожалуйста! Задан двухмерный массив целых чисел А размером М на N. Найти сумму элементов,...

Дан двумерный массив целых чисел. Определить сумму элементов массива, больших 30
Дан двумерный массив целых чисел. Определить сумму элементов массива, больших 30.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru