Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Dower
0 / 0 / 0
Регистрация: 17.01.2010
Сообщений: 50
#1

обработка массивов - Turbo Pascal

22.09.2010, 08:21. Просмотров 473. Ответов 5
Метки нет (Все метки)

Помогите с задачкой.

Составить программу вычисления произведения двух целочисленных матриц A[1..n, 1..m] и B[1..m, 1..t]. Элементы результирующей, также целочисленной, матрицы С[1..n, 1..t] определяются по формуле
C[i, j]=A[i, 1]*B[1, j]+ A[i, 2]*B[2, j]+…+ A[i, m]*B[m, j].
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.09.2010, 08:21
Здравствуйте! Я подобрал для вас темы с ответами на вопрос обработка массивов (Turbo Pascal):

Обработка массивов - Turbo Pascal
Люди добрые, помогите!!!плииз 1) Вычислить значения 30 элементов одномерного целочисленного массива T в интервале (-8 ,7) c...

Обработка Массивов - Turbo Pascal
Задача 1 В одномерном массиве А, состоящий из N вещественных элементов, вычислить: a) произведение элементов массива с нечетными...

Обработка массивов - Turbo Pascal
Проверить, можно ли получить последовательность значений элемен-тов заданного массива a из последовательности значений элементов другого...

обработка многомерных массивов - Turbo Pascal
В массиве А(n,n) определить кол-во элементов, по модулю меньших 20.

ОБРАБОТКА ОДНОМЕРНЫХ МАССИВОВ - Turbo Pascal
ОБРАБОТКА ОДНОМЕРНЫХ МАССИВОВ

Подпрограммы. Обработка массивов - Turbo Pascal
Задан массив, Найти среднее арифметической элементов над главной диагональю. у меня получилось следующее, только как записать среднее...

5
Puporev
Модератор
52841 / 40652 / 13905
Регистрация: 18.05.2008
Сообщений: 94,358
22.09.2010, 09:51 #2
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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
uses crt;
const max=20;
var a,b,c:array[1..max,1..max]of integer;
    n,m,t,i,j,p:integer;
begin
clrscr;
randomize;
repeat
write('Количество строк матрицы А до ',max,' n=');
readln(n);
until n in [1..max];
repeat
write('Количество столбцов матрицы А до ',max,' m=');
readln(m);
until m in [1..max];
repeat
write('Количество столбцов матрицы В до ',max,' t=');
readln(t);
until t in [1..max];
writeln('Matrica A:');
for i:=1 to n do
   begin
     for j:=1 to m do
       begin
         a[i,j]:=random(9)+1;
         write(a[i,j]:3);
       end;
     writeln;
   end;
writeln('Matrica B:');
for i:=1 to m do
   begin
     for j:=1 to t do
       begin
         b[i,j]:=random(9)+1;
         write(b[i,j]:3);
       end;
     writeln;
   end;
for p:=1 to n do
for j:=1 to t do
   begin
     c[p,j]:=0;
     for i:=1 to m do
       begin
         c[p,j]:=c[p,j]+a[p,i]*b[i,j];
       end;
   end;
writeln('Matrica C=A*B:');
for i:=1 to n do
    begin
      for j:=1 to t do
      write(c[i,j]:5);
      writeln;
    end;
readln;
end.
1
Wolfraim
0 / 0 / 0
Регистрация: 12.09.2010
Сообщений: 25
26.09.2010, 16:15 #3
Помогите, пожалуйста, с похожей задачкой.

Составить программу вычисления целочисленной матрицы.
Дан массив A[n, n]. Вычислить выражение А+А*А+А*А*А.
0
Puporev
Модератор
52841 / 40652 / 13905
Регистрация: 18.05.2008
Сообщений: 94,358
26.09.2010, 16:17 #4
Wolfraim, Как считать произведение, здесь написано, а сумма это просто
Pascal
1
2
3
for i:=1 to n do
for j:=1 to n do
c[i,j]:=a[i,j]+b[i,j];
0
Wolfraim
0 / 0 / 0
Регистрация: 12.09.2010
Сообщений: 25
26.09.2010, 16:21 #5
Цитата Сообщение от Puporev Посмотреть сообщение
Pascal
1
2
3
for i:=1 to n do
for j:=1 to n do
c[i,j]:=a[i,j]+b[i,j];
Здесь квадратная матрица, цикл будет только по i?
0
Puporev
Модератор
52841 / 40652 / 13905
Регистрация: 18.05.2008
Сообщений: 94,358
26.09.2010, 16:46 #6
Wolfraim, Попробуй сам, зачем спрашивать. Умного учить, только портить....

Добавлено через 1 минуту
Количество циклов зависит не от квадратности или кубичности матрицы, а от ее размерности.
0
26.09.2010, 16:46
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.09.2010, 16:46
Привет! Вот еще темы с ответами:

Обработка массивов данных - Turbo Pascal
1)Найти сумму S положительных элементов над главной диагональю матрицы. 2)Найти максимальный элемент среди отрицательных элементов 4-й...

Обработка динамических массивов - Turbo Pascal
Заполнить массив В(10) случайными значениями. Организовать вывод на экран. Присвоить указателю адрес начала размещения массива в памяти....

обработка динамических массивов - Turbo Pascal
Заполнить массив В(10) случайными значениями. Организовать вывод на экран. Присвоить указателю адрес начала размещения массива в памяти....

Обработка двумерных массивов - Turbo Pascal
Написать программу, которая будет формировать двумерный массив размера m x n (n-число строк, m-число столбцов) *согласно заданию. Числа m и...


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

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

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