 Поиск максимума, Найти в списке |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| -=Mikka=- |
 23.06.2005 21:28
Сообщение
#1
|
|
Гость  |
Помогите плз.:
Нужно найти максимальное из чисел встрчающихся в односвязном списке более одного раза. Мой способ(см ниже) не пашет, что не так? HE-E-E-E-LP мозг закипает :ypr: Код buff:=base; buff1:=base^.next; For i:=1 to n-1 begin while buff1^.next<>nil do begin if buff^.data=buff1^.data then if buff^.data>max then max:=buff^.data; buff1:=buff1^.next end; buff:=buff^.next end; |
 
|
|
  |
Ответов
| -Katrin- |
26.06.2005 20:44
Сообщение
#2
|
|
Гость |
А как сделать тоже самое в матрице? :p2:
|
|
|
|
Сообщений в этой теме
-=Mikka=- Поиск максимума 23.06.2005 21:28
volvo -=Mikka=-,
Немного не так... Вот так должно быть:
... 23.06.2005 21:47 klem4 Katrin, пользуйтесь поиском по форуму и загляните ... 27.06.2005 8:20 volvo klem4, я не думаю что в FAQ что-нибудь подобное ес... 27.06.2005 11:21 klem4 вот такой вариант можно наверное :
uses
crt;... 27.06.2005 13:14 volvo Можно... Только вместо этого:
count:=0;
for... 27.06.2005 13:21
klem4 конечно проще, я же говорю не зал я как absolute д... 27.06.2005 13:23 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 15.11.2025 13:27 |