Пятница, 24.01.2025
Pascal 4 All
[ · Новые сообщения · Участники · Правила форума · Поиск · RSS ]

 

  • Страница 1 из 1
  • 1
Модератор форума: Seqular, Pavel  

Матрица
MymindismyДата: Воскресенье, 23.11.2008, 21:13 | Сообщение # 1
Знакомый
Группа: Пользователи
Сообщений: 16
Репутация: 0
Замечания: 20%
Статус: Offline
1. Задана квадратная матрица. Поиенять местами строку с максимальным элементом на главной диагонали со строкой с заданным номером m.
 
SeqularДата: Воскресенье, 23.11.2008, 21:30 | Сообщение # 2
Хранитель
Группа: Администраторы
Сообщений: 859
Репутация: 35
Статус: Offline
Итак, первый шаг: ищем максимальный элемент на главной диагонали.
Code
max_v := a[1,1];
max_i := 1;
For i := 2 to N do
      If (a[i,i] > max_v) then
         Begin
         max_i := i;
         max_v := a[i,i];
         End;

Затем меняешь строку с номером max_i на строку с номером m.
Как менять местами строки в матрице - смотри здесь


Поддерживаю также проект сообщество молодых сисадминов
 
MymindismyДата: Вторник, 25.11.2008, 04:24 | Сообщение # 3
Знакомый
Группа: Пользователи
Сообщений: 16
Репутация: 0
Замечания: 20%
Статус: Offline
огромнейшее спасибо!!!!!1

Добавлено (24.11.2008, 21:24)
---------------------------------------------
что-то он не сильно хочет максимальное находить... sad

 
  • Страница 1 из 1
  • 1
Поиск:

Copyright MyCorp © 2025
Используются технологии uCoz
javascript:;" rel="nofollow" onclick="loginPopupForm(); return false;