0 / 0 / 0
Регистрация: 04.10.2011
Сообщений: 3
1

посчитать норму матрицы, используя подпрограмму-функцию

05.10.2011, 19:46. Показов 1286. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Надо найти норму матрицы, т.е максимальную сумму модулей элементов каждой строки. Как я поняла эту задачу, что надо найти вектор, составленный из суммы элементов соответствующей строки, и в этом векторе найти максимальный элемент... долго пыталась написать программу, но не очень понимаю подпрограммы..... вот что у меня получилось, но, к сожалению, не работает....:

Program g8_8;
type Matr=array[1..100,1..100] of integer; vct=array[1..100] of integer;
Var i,j,mm,s,nn:Integer; X:Matr; b:Vct;
Procedure Vvdmtr(n,m:Integer; var A:Matr);
Begin
Writeln('vvedite',n,' strok po',m,' el');
Writeln('v konce kaczdoi str Enter');
for i:=1 to n do
for j:=1 to m do read(A[i,j]);
end;
Function norma(n,m:Integer; a:matr):Integer;
Var max:Integer;
Begin
max:=0;
for i:=1 to n do
begin
b[i]:=0;
for j:=1 to m do
b[i]:=b[i] + A[i,j];
max:=b[1];
for i:=2 to n do
if b[i] > max then max:=b[i];
norma:=max;
end;
end;
BEGIN
Writeln('vvedite razmernost matrici');
readln(nn,mm);
norma(nn,mm,X);
writeln('norma= ', norma(nn,mm,X));
Readln;
Readln;
End.
Вложения
Тип файла: txt 1.txt (759 байт, 9 просмотров)
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.10.2011, 19:46
Ответы с готовыми решениями:

Составить программу для нахождения сумм элементов каждой строки матрицы, используя подпрограмму-функцию
2. даны действительные матрицы А(15,10) и В(9,7). Составить программу для нахождения сумм элементов...

Используя подпрограмму - функцию
z=arctg(x+a)-(cos(x-y)/a*x+b*y)) x=0,4; y=1,2; x=0,25; y=1,3; a=0,54; b=1 при всех значениях...

Описать функцию вещественного типа, вычисляющую норму матрицы
Описать функцию Norm2(A,M,N) вещественного типа, вычисляющую норму матрицы А размерами MxN с...

Вычислить вектор, используя подпрограмму-функцию
Прошу помощи профессионалов :3 Дано три вектора А(20), B(20), С(20) (применить датчик случайных...

3
Почетный модератор
64301 / 47596 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
05.10.2011, 19:51 2
Лерочка1992, С головой все в порядке?
Норма матрицы
0
0 / 0 / 0
Регистрация: 04.10.2011
Сообщений: 3
05.10.2011, 19:57  [ТС] 3
вы написали мне программу с незнакомыми для моего преподавателя элементами.. Например Randomize мы ни разу не использовали.. извините, просто мне не понятна была ваша программа
0
Почетный модератор
64301 / 47596 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
05.10.2011, 20:03 4
Цитата Сообщение от Лерочка1992 Посмотреть сообщение
просто мне не понятна была ваша программа
Вы думаете в этой теме Вам по другому напишут? Ну не проходили это наисложнейшее randomize, заполните матрицу как проходили, в чем проблема?
0
05.10.2011, 20:03
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.10.2011, 20:03
Помогаю со студенческими работами здесь

используя подпрограмму перестановки i и j столбцов матрицы, преобразуйте матрицы А(4,5), В(4,4), С(5,4)
используя подпрограмму перестановки i и j столбцов матрицы, преобразуйте матрицы А(4,5), В(4,4),...

Вычислить значение выражение z, используя подпрограмму-функцию v (x, y)
заранее спасибо) вычислить значение выражения z, использя подпрограмму-функцию v(x,y). a,b...

Вычислить, используя подпрограмму функцию для нахождения максимума и минимума
добрый день, кто может помочь с задачей? Даны действительные числа x,y. Вычислить, используя...

Составьте подпрограмму (используя функцию) решения квадратного уравнения ах2 +bx +c = 0
16,Составьте подпрограмму (используя функцию) решения квадратного уравнения ах2 +bx +c = 0.


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

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

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