Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 1
1

В заданной квадратной матрице вычислить сумму элементов, расположенных над главной диагональю

14.02.2017, 22:02. Просмотров 1054. Ответов 1
Метки нет (Все метки)

В заданной квадратной матрице A(K,K) (K>=10) вычислить сумму элементов, расположенных над главной диагональю. Полученной суммой заменить элементы последнего столбца матрицы. Отпечатать исходную и преобразованную матрицы.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.02.2017, 22:02
Ответы с готовыми решениями:

В заданной квадратной матрице вычислить сумму элементов, расположенных над главной диагональю
1. В заданной квадратной матрице A(K,K) (K<=10) вычислить сумму элементов, расположенных над...

В целостной квадратной матрице найти сумму элементов, стоящих над главной диагональю
В целостной квадратной матрице найти сумму элементов, стоящих над главной диагональю

Вычислить сумму элементов матрицы, расположенных над главной диагональю
Помогите с решением В заданной квадратной матрице A(K,K) (K<=10) вычислить сумму элементов,...

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

1
1729 / 1324 / 1405
Регистрация: 28.10.2016
Сообщений: 4,265
15.02.2017, 03:55 2
Лучший ответ Сообщение было отмечено Krab123 как решение

Решение

Если я правильно понял условие, то на здоровье
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
28
29
30
31
32
33
const
n=10;
var
A:array [1..n,1..n] of integer;
sum,i,j,k:integer;
begin
randomize;
write('Исходная матрица:');
for i:=1 to n do begin
  writeln;
  for j:=1 to n do begin
    A[i,j]:=random(20);
    write(A[i,j]:4);
    end;
end;
k:=1;
sum:=0;
for i:=1 to n do begin
  k:=k+1;
  for j:=k to n do begin
    sum:=sum+A[i,j];
  end;
  end;
for i:=1 to n do
  A[i,n]:=sum;
writeln;
write('Результат:');
for i:=1 to n do begin
  writeln;
  for j:=1 to n do
    write(A[i,j]:4);
  end;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.02.2017, 03:55

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

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

В динамичной квадратной матрице найти сумму элементов над главной диагональю
В динамичной квадратной матрице найти сумму над главной диагональю. Добавлено через 14 минут...

В матрице найти сумму элементов, расположенных над главной диагональю
В заданном в двухмерном массиве найти сумму элементов, расположенных над главной диагональю

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


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.