 Одномерный массив - вроде бы просто? |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Petruxa |
 14.03.2007 9:25
Сообщение
#1
|
|
Гость  |
Ребят помогите пожалуйста, второй день голову ломаю, что-то никак не выходит!
Найти три наименьших по значению элемента одномерного массива (равные не учитывать) целых чисел, введеных с клавы. Заменить их на соответствующие им индексы. Спасибо |
 
|
|
  |
Ответов
| klem4 |
14.03.2007 12:39
Сообщение
#2
|
 Perl. Just code it!  Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация:  44  |
Цитата Но, Клем, у тебя все же есть ошибка.. yes2.gif Примерно такая же, как та, что я у себя исправлял. Нельзя на втором и третьем проходе брать первый номер в качестве начального. У меня то учитывается: Цитата if (A[i] < A[min]) and ((j = 1) or (A[i] > A[M[j - 1]])) then Единственное можно еще опставить {$B-}
Или о чем ты ? Поясни, в каком случае будет ошибка. -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
   |
|
Сообщений в этой теме
Petruxa Одномерный массив - вроде бы просто? 14.03.2007 9:25
Lapp Вот такой код, вроде, должен работать (не проверял... 14.03.2007 10:04 klem4 const
n = 4;
type
TArray = array [1..n] of Inte... 14.03.2007 10:14
Petruxa 'klem4' - огромное спасибо, всё работает... 14.03.2007 10:36 Lapp Да, схема Klem4 лучше.. :)
Свою я исправил (надо и... 14.03.2007 10:33 Petruxa а может лучше выложить Ваш код?
очень интересно... 14.03.2007 10:38 Lapp И еще одна: надо подсчитывать количество минимумов... 14.03.2007 10:40 Гость помоему код klem4 проще и понятней, а особых изыск... 14.03.2007 11:32 Lapp
помоему код klem4 проще и понятней, а особых изыс... 14.03.2007 11:52 volvo Я бы сделал вот это (для общего случая, а не тольк... 14.03.2007 12:15 Lapp Пока смотрел код volvo, нашел еще одну ошибку у се... 14.03.2007 12:28 Lapp Проверь на массиве 1, 2, 3, 4
Твоя прога выдает ин... 14.03.2007 12:46 klem4 Действительно, тогда вот что сочинил:
for j := 1 ... 14.03.2007 13:09 Lapp
Действительно, тогда вот что сочинил:
Можно и та... 14.03.2007 13:44 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 20.07.2025 13:48 |