|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
16.05.2015, 21:22 | #1 |
Пользователь
Регистрация: 14.05.2015
Сообщений: 19
|
Помогите с задачей
Есть 2 ряда чисел. Первый задаётся вручную, второй соответствует формуле 6n, то есть 6,12,18 и т.д. Нужно найти одинаковые числа в этих двух рядах.
Например при заданном ряде 1,3,6,7,12,17,24 в результате будут числа 6,12,24 |
16.05.2015, 23:26 | #2 |
Старожил
Регистрация: 23.10.2010
Сообщений: 2,309
|
В чем проблема?
Просматривай ряд. Для полученного члена ряда проверяешь остаток при делении на 6. Если остаток равен нулю, то этот член принадлежит второму ряду. Код:
Как-то так, ...
|
16.05.2015, 23:34 | #3 |
Пользователь
Регистрация: 14.05.2015
Сообщений: 19
|
|
17.05.2015, 00:05 | #4 |
Старожил
Регистрация: 23.10.2010
Сообщений: 2,309
|
В этом случае немного сложнее.
1. Необходимо получить остаток от деления элемента ряда на 2. 2. Если остаток 0 то элемент является претендентом на членство во втором ряде. 3. Если элемент - претендент, то поделить элемент ряда на 2: m := a[i] DIV 2; 4. В цикле по n, пока 6n - 4 <= m, ищем остаток от деления элемента ряда на 6n - 4. 5. Если остаток 0, то элемент ряда принадлежит второму ряду. Как-то так, ... PS: Как лучший, на мой взгляд, вариант: К элементу ряда прибавляешь 4 и затем ищешь остаток от деления на 6. :-) Это так, поскольку: a[i] = 6n - 4; a[i] + 4 = 6n;
Как-то так, ...
Последний раз редактировалось ViktorR; 17.05.2015 в 00:11. |
17.05.2015, 05:18 | #5 |
Я самый любопытный
Участник клуба
Регистрация: 24.07.2012
Сообщений: 1,949
|
Код:
|
17.05.2015, 10:02 | #6 |
Пользователь
Регистрация: 14.05.2015
Сообщений: 19
|
|
17.05.2015, 10:53 | #7 |
Я самый любопытный
Участник клуба
Регистрация: 24.07.2012
Сообщений: 1,949
|
Пожалуйста!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
помогите с задачей | Марсель1 | Помощь студентам | 1 | 26.04.2014 13:50 |
Помогите с задачей | neong | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 25.11.2013 10:28 |
помогите с задачей | StakanpORTvejna | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 11.10.2008 19:19 |
Помогите с задачей на С++ | Nemisoi | Помощь студентам | 1 | 22.04.2008 22:09 |