Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 23.12.2010, 16:11
shokoladka shokoladka вне форума
Прохожий
 
Регистрация: 25.11.2010
Сообщения: 10
Репутация: 10
По умолчанию Дана вещественная матрица А размером m x n

Чтобы получить зачет, нужно сдать задачу.....а я с ней уже столько мучаюсь....Напишите пожалуйста как можно решить эту задачу:

Дана вещественная матрица А размером m x n.
Обозначим А'(i, j) - верхний левый угол матрицы А до i-ой строки и j-го столбца (подматрица).
Каждому элементу исходной матрицы аij прискоить значение минимального элемента среди элементов А'(i, j).
Ограничение: разрешается в программе использовать единственную матрицу.
Ответить с цитированием
  #2  
Старый 23.12.2010, 16:21
Аватар для EvilRussian
EvilRussian EvilRussian вне форума
Начинающий
 
Регистрация: 21.12.2010
Адрес: Россия, Красноярский край
Сообщения: 177
Репутация: 22
По умолчанию

То есть как?
Надо забить весь двухмерный массив наименьшим из значений?
Тогда создаёшь min: integer, потом min:=дохреналлион; и сравниваешь каждый элемент циклом с min. Если меньше, то min:=проверяемое.
Ну а потом забиваешь весь массив min'ами с помощью цикла.

Я тебя правильно понял?
__________________
Если не ты, то кто?
(с) Терри Пратчетт

Не забывайте ставить плюсы и говорить спасибо!
Ответить с цитированием
  #3  
Старый 23.12.2010, 16:27
shokoladka shokoladka вне форума
Прохожий
 
Регистрация: 25.11.2010
Сообщения: 10
Репутация: 10
По умолчанию

Не совсем так....В данной матрице, нужно выделять подматрицы и в каждой под матрице находить минимум, т.е. 1.цикл: находим минимум в 1 строке; 2 цикл: находим минимум в 1 столбце; и 3 цикл сравниваем 3 числа ( минимум 1 строчки, минимум 1 столбца и допустим а(2,2) и заменяем а(2,2) на самое маленькое из этих трех)
я путаюсь в циклах....
помогите с ними пожалуйста
Ответить с цитированием
  #4  
Старый 23.12.2010, 16:29
Аватар для EvilRussian
EvilRussian EvilRussian вне форума
Начинающий
 
Регистрация: 21.12.2010
Адрес: Россия, Красноярский край
Сообщения: 177
Репутация: 22
По умолчанию

Код:
a: array [1..m] of array [1..n] of integer;
min,x,y: integer;

...

min:=1000;

For x:=1 to i do
begin
 For y:=1 to j do
  begin
   if a[x,y]<min then min:=a[x,y];
  end;
end;

For x:=1 to i do
begin
 For y:=1 to j do
  begin
   a[x,y]:=min
  end;
end;

Естественно я опустил часть с получением данных.
Оптимизация влияет на оценку?

UPD: СОРРИ, ОПОЗДАЛ.
Не понял сразу, щас подумаю.
__________________
Если не ты, то кто?
(с) Терри Пратчетт

Не забывайте ставить плюсы и говорить спасибо!
Ответить с цитированием
  #5  
Старый 23.12.2010, 16:35
shokoladka shokoladka вне форума
Прохожий
 
Регистрация: 25.11.2010
Сообщения: 10
Репутация: 10
По умолчанию

Что-то у меня не так немного считает.....
Да, конечно очень влияет на оценку.....Препод вредный попался (
Ответить с цитированием
  #6  
Старый 23.12.2010, 16:35
Аватар для EvilRussian
EvilRussian EvilRussian вне форума
Начинающий
 
Регистрация: 21.12.2010
Адрес: Россия, Красноярский край
Сообщения: 177
Репутация: 22
По умолчанию

Жуть ну и извращение.
Когда я пытаюсь это представить, у меня мозг плавиться начинает :/
Сейчас ещё подумаю, и если не получится, придётся ждать старожилов.
__________________
Если не ты, то кто?
(с) Терри Пратчетт

Не забывайте ставить плюсы и говорить спасибо!
Ответить с цитированием
  #7  
Старый 23.12.2010, 16:36
Аватар для EvilRussian
EvilRussian EvilRussian вне форума
Начинающий
 
Регистрация: 21.12.2010
Адрес: Россия, Красноярский край
Сообщения: 177
Репутация: 22
По умолчанию

Это не тот код, я тогда твоего сообщения не видел.
__________________
Если не ты, то кто?
(с) Терри Пратчетт

Не забывайте ставить плюсы и говорить спасибо!
Ответить с цитированием
  #8  
Старый 23.12.2010, 16:44
Аватар для EvilRussian
EvilRussian EvilRussian вне форума
Начинающий
 
Регистрация: 21.12.2010
Адрес: Россия, Красноярский край
Сообщения: 177
Репутация: 22
По умолчанию

Что-то я всё равно не понимаю. Если необходимо делать так, как ты написала, то i=j, а этого в задаче не сказано.
И когда дойдёшь до последней строки/столбца, куда писать минимум?
__________________
Если не ты, то кто?
(с) Терри Пратчетт

Не забывайте ставить плюсы и говорить спасибо!
Ответить с цитированием
  #9  
Старый 23.12.2010, 16:49
shokoladka shokoladka вне форума
Прохожий
 
Регистрация: 25.11.2010
Сообщения: 10
Репутация: 10
По умолчанию

Вместо числа которое находится на последней строке/столбце
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 11:08.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter