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

Норма матрицы

04.10.2011, 21:30. Показов 1358. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Используя процедуру или функцию вычислить норму матрицы... в матрице a необходимо найти такую строку i, что сумма модулей всех элементов в ней (строке под номером i) была бы максимальной. основа программы в вычислении
Pascal
1
2
3
4
max:=m[1,1];
for i:=1 to p do
for j:=1 to p do if ABS(m[i,j])>max then max:=ABS(m[i,j]);
n:=max;
Но кажется эту программу можно писать только через функцию...
0
04.10.2011, 21:30
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
04.10.2011, 21:30
Ответы с готовыми решениями:

Определить, через сколько дней норма пробега спортсмена может стать 10 км?
За один день легкоатлет пробегает n км каждый последующий день он увеличивает норму на k%. Через сколько дней норма пробега может стать...

Зачетная программа: определить, через сколько дней норма пробега будет больше 50 км
спортсмен пробежал за 1 день N км каждый день он увеличевал нагрузку на K% определить через сколько дней норма пробега будет больше 50 км

норма матрицы
Добрый вечер, пожалуйста, помогите написать программу: необходимо определить норму заданной матрицы A||aij|| заранее спасибО))

1
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
05.10.2011, 15:43 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
uses crt;
const nmax=20;
type mass=array[1..nmax] of integer;{массив=1 строка матрицы}
     matr=array[1..nmax] of mass;{матрица=массив строк}
function Summa(a:mass;m:byte):integer;{функция суммы модулей в строке}
var i:byte;
    s:integer;
begin
s:=0;
for i:=1 to m do
s:=s+abs(a[i]);
Summa:=s;
end;
var a:matr;
    m,n,i,j:byte;
    nrm:integer;
begin
clrscr;
randomize;
repeat
write('Количество строк до ',nmax,' n=');
readln(n);
until n in [1..nmax];
repeat
write('Количество столбцов до ',nmax,' m=');
readln(m);
until m in [1..nmax];
writeln('Исходная матрица:');
for i:=1 to n do
 begin
  for j:=1 to m do
   begin
    a[i,j]:=-25+random(51);
    write(a[i,j]:4);
   end;
  writeln;
 end;
writeln;
nrm:=Summa(a[1],m);
for i:=1 to n do
 begin
  writeln('Сумма модулей в строке ',i,'=',Summa(a[i],m));
  if Summa(a[i],m)>nrm then nrm:=Summa(a[i],m);
 end;
writeln;
write('Ноpма матрицы=',nrm);
readln
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
05.10.2011, 15:43
Помогаю со студенческими работами здесь

Норма матрицы
16. Даны три квадратных матрицы A, B, C n-го порядка. Вывести на печать ту из них, норма которой наименьшая. Пояснение. Нормой матрицы...

взвешенная норма вектора.
Мне нужно решить задачу: Найти взвешенную норму вектора. Очень надо!!!

Напечатать ту из матриц, норма которой наименьшая
:help:вот такая вот задачка...поможете?

Напечатать ту матрицу, норма которой наибольшая
2)Получить три квадратные матрицы 4*4 из случайных целых чисел, среди которых есть как положительные , так и отрицательные. Будем считать...

Выведите на печать ту из матриц, норма которой наименьшая
Даны три квадратных матрицы А,В,С n-го порядка. Выведите на печать ту из них, сумма которой наименьшая.(Норма-максимум из абсолютных...


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

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

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Опции темы

Новые блоги и статьи
Микросервис с нуля на Go с Kafka
stackoverflow 12.02.2025
Когда я впервые столкнулся с необходимостью разделить монолитное приложение на микросервисы, передо мной встал вопрос выбора правильных технологий и подходов. После долгих экспериментов с различными. . .
Микросервис с нуля на C# с RabbitMQ
stackoverflow 12.02.2025
Переход от монолитной архитектуры к микросервисной - это не просто модное веяние, а закономерный этап эволюции программных систем. В отличие от монолита, где все компоненты тесно связаны между собой. . .
Docker для начинающих
stackoverflow 12.02.2025
В современном мире разработки программного обеспечения все чаще возникает необходимость быстро и надежно разворачивать приложения в различных средах. Разработчики постоянно сталкиваются с проблемой. . .
Создание бота для Телеграм на C#
stackoverflow 12.02.2025
В современном мире корпоративных коммуникаций Telegram-боты становятся незаменимым средством автоматизации бизнес-процессов и взаимодействия с сотрудниками. Как создать такого бота, который сможет. . .
Операторы сравнения (== и ===) в JavaScript
hw_wired 12.02.2025
JavaScript предоставляет два основных оператора сравнения - оператор нестрогого равенства (==) и оператор строгого равенства (===). На первый взгляд они могут показаться очень похожими, но их. . .
Определение адреса, откуда репозиторий Git был клонирован
hw_wired 12.02.2025
Система контроля версий Git хранит всю информацию о репозитории в специальной директории . git, включая данные об удаленных источниках. Эта информация необходима для синхронизации изменений между. . .
Объединение нескольких коммитов Git в один
hw_wired 12.02.2025
Представьте, что вы работаете над новой функциональностью и создали десяток небольших коммитов: исправление опечатки, форматирование кода, добавление комментариев, реализация основной логики. Каждый. . .
Как добавить локальную ветку в удалённый репозиторий Git
hw_wired 12.02.2025
Локальная ветка в Git - это изолированная линия разработки, существующая только на вашем компьютере. Представьте себе дерево с множеством веток - каждая ветка может расти в своем направлении, не. . .
Статическое отражение в C++
stackoverflow 12.02.2025
Статическое отражение представляет собой мощный механизм, позволяющий программам анализировать и манипулировать своей собственной структурой во время компиляции. Эта возможность открывает. . .
C++ в 21 веке - Бьярне Страуструп
stackoverflow 12.02.2025
В современном мире разработки программного обеспечения C++ продолжает оставаться одним из ключевых языков программирования, несмотря на свой солидный возраст - более 45 лет с момента создания. За это. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru