|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
25.05.2010, 00:49 | #1 |
Пользователь
Регистрация: 11.04.2010
Сообщений: 13
|
вывод наименее отличающихся друг от друга
Дан целочисленный массив из 40 элементов. Элементы массива могут принимать произвольные значения. Опишите на языке программирования алгоритм, который находит и выводит номера двух элементов массива, наименее отличающихся друг от друга.
Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них. const N=40; var а: array [1..N] of integer; i, j, min, min2, s: integer; begin for i :=1 to N do readln(a[i]); … end. |
25.05.2010, 10:15 | #2 |
Форумчанин
Регистрация: 04.05.2010
Сообщений: 495
|
Отсортировать и сравнивать соседние.
Нажми на весы, поставь +
Для благодарностей : WebMoney WMR R252732729948 |
25.05.2010, 10:48 | #3 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
в данном случае сравнить попарно каждый элемент с каждым и не надо заморачиваться с сортировкой.
Код:
|
25.05.2010, 14:03 | #4 |
Пользователь
Регистрация: 11.04.2010
Сообщений: 13
|
Serge_Bliznykov! спасибо вам большое!!!!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Строчки налезают друг на друга | Lukker | Microsoft Office Word | 4 | 27.02.2010 07:38 |
Z порядок компонентов и их перекрывание друг друга | Пепел Феникса | Общие вопросы Delphi | 6 | 04.05.2009 21:25 |
Ссылка в ячейках друг на друга | ded- | Microsoft Office Excel | 3 | 10.04.2009 15:42 |
Наложения изображения друг на друга | rudakop | HTML и CSS | 1 | 16.09.2008 03:03 |