Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
lolol
0 / 0 / 0
Регистрация: 02.12.2013
Сообщений: 8
1

Вычислить сумму элементов матрицы

02.12.2013, 14:54. Просмотров 828. Ответов 3
Метки нет (Все метки)

Помогите пожалуйста!!!!
1)Вычислить сумму элементов матрицы A размерностью n*m с элементами ai,j, i= 1, 2, …, n; j =
1, 2,…, m.
 Комментарий администратора 
одна тема, одна задача, читайте правила форума
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.12.2013, 14:54
Ответы с готовыми решениями:

Вычислить сумму элементов главной диагонали на сумму элементов в 3-й строки матрицы
Создайте матрицу (5х5). Вычислить сумму элементов главной диагонали на сумму элементов в 3-й строки.

Матрицы: Вычислить сумму элементов с индексами, кратными 3, среднее арифметическое четных элементов
Тема: Матрицы. Дан двумерный массив Х размером n*m, заполненный случайными числами. Вычислить...

Вычислить сумму диагональных элементов матрицы и количество элементов,значение которых меньше 3
Вычислить сумму диагональных элементов матрицы и количество элементов,значение которых меньше 3.

Организовать массив из произведений элементов матрицы в каждой строке, вычислить сумму элементов
Задание: Задан двумерный массив А из 6-и строк и 3-х столбцов. Составить программу, которая...

Составить подпрограмму определения суммы элементов одномерного массива. Используя ее, вычислить сумму элементов матрицы
Помогите, пожалуйста написать программу в TP. Составить подпрограмму определения суммы элементов...

3
erl27
895 / 743 / 832
Регистрация: 06.09.2013
Сообщений: 1,561
02.12.2013, 15:04 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Цитата Сообщение от lolol Посмотреть сообщение
1)Вычислить сумму элементов матрицы A размерностью n*m с элементами ai,j, i= 1, 2, …, n; j =1, 2,…, m.
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
var
  A: array[1..50, 1..50] of integer;
  i, j, S, N, M: integer;
  
begin
  S := 0;
  write(' N = ');
  readln(N);
  write(' M = ');
  readln(M);
  writeln;
  randomize;
 { Выводим матрицу: }
  writeln('Матрица (', N, ' X ', M, ') случайных чисел:');
  writeln;
  for i := 1 to N do
  begin
    for j := 1 to M do
    begin
      a[i, j] := -20 + random(51);
      write(a[i, j]:5);
      S := S + a[i, j]
    end; 
    writeln
  end;
  writeln;
  writeln('Сумма элементов матрицы: ', S);
  readln;
end.
0
lolol
0 / 0 / 0
Регистрация: 02.12.2013
Сообщений: 8
02.12.2013, 15:14  [ТС] 3
Спасибо!
0
erl27
895 / 743 / 832
Регистрация: 06.09.2013
Сообщений: 1,561
02.12.2013, 15:16 4
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Цитата Сообщение от lolol Посмотреть сообщение
2)Найти сумму элементов главной диагонали матрицы А размерностью 10*10, элементы кото-
рой определяются по формуле: ai,j=i*sin(i+j)-sin(i-j), i,j=1,2,...,10.
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
const
  N = 10;
 
var
  A: array[1..N, 1..N] of real;
  S: real;
  i, j: integer;
 
begin
  S := 0;
  randomize;
  { Выводим матрицу: }
  writeln('Вводим матрицу (', N, ' X ', N, ') вещественных чисел:');
  writeln;
  for i := 1 to N do
  begin
    for j := 1 to N do
    begin
      a[i, j] := i * sin(i + j) - sin(i - j);
      write(a[i, j]:8:3);
      if i = j then S := S + a[i, j]//сумма элементов главной диагонали
    end; 
    writeln
  end;
  writeln;
  writeln('Сумма элементов главной диагонали матрицы: ', S:0:3);
  readln;
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
02.12.2013, 15:16

Вычислить сумму элементов матрицы
Привет помогате пожулуйста(( Условие задачи таковы: вычеслить сумму элементов матрицы 7*7

Вычислить сумму элементов матрицы
Дана матрица А из n строк и m столбцов. Изменить матрицу прибавляя к каждому отрицательному...

Вычислить сумму диагональных элементов матрицы
Всем добрый вечер, прошу помочь с заданием: Объявить двумерный массив. Использовать циклическую...


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

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

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