Формулировка задачи:
Всем доброй ночи!
Прошу помощи. Как правильно показать в ячейках Excel все делители заданного числа? Именно в ячейках Excel!
Пусть число 34, тогда его делители: 1; 2; 17; 34.
Прошу не предлагать: MsgBox и Debug.Print — эти способы мне известны.
На картинке, ниже, код Excel неверно выводит делители у меня: 34; 34; 34; 34. Как исправить?
Код к задаче: «Как показать в ячейках Excel все делители заданного числа?»
textual
... Range("C4").Offset(, f) = J ...
Полезно ли:
8 голосов , оценка 3.875 из 5
|
Заблокирован |
||||
1 |
||||
27.03.2017, 00:42. Показов 13778. Ответов 5 Метки нет (Все метки)
Всем доброй ночи! Прошу помощи. Как правильно показать в ячейках Excel все делители заданного числа? Именно в ячейках Excel! Прошу не предлагать: MsgBox и Debug.Print — эти способы мне известны. На картинке, ниже, код Excel неверно выводит делители у меня: 34; 34; 34; 34. Как исправить?
Миниатюры
0 |
k61 85 / 82 / 31 Регистрация: 13.10.2014 Сообщений: 167 |
||||
27.03.2017, 03:16 |
2 |
|||
Сообщение было отмечено MyExcel_17 как решение Решение
1 |
Заблокирован |
||||
27.03.2017, 08:28 [ТС] |
3 |
|||
Range(«C1»).Offset(f) = j f = f + 1 k61, спасибо. Ещё вопрос. Как можно сделать, чтобы показывались делители по столбцам (C3:F3), заданное число 34, код ниже. Смотрите строку 21.
0 |
85 / 82 / 31 Регистрация: 13.10.2014 Сообщений: 167 |
|
27.03.2017, 09:10 |
4 |
Нужны делители не превышающие значения переменной imax ?
0 |
Заблокирован |
||||
27.03.2017, 16:05 [ТС] |
5 |
|||
Нужны делители не превышающие значения переменной imax ? k61, наверно Вы ошибаетесь. Кто понимает, подскажите пожалуйста, как сделать смещение делителей числа 34 не вниз по строкам, а вправо по столбцам (C4:F4). Картинка и код ниже.
Миниатюры
0 |
k61 85 / 82 / 31 Регистрация: 13.10.2014 Сообщений: 167 |
||||
28.03.2017, 02:26 |
6 |
|||
Сообщение было отмечено MyExcel_17 как решение РешениеДобавьте запятую перед счётчиком «f»:
1 |
dalton Пользователь Сообщений: 32 |
Здравствуйте! Прикрепленные файлы
|
Вообще-то, делители — простые числа. Так, для 20 делителями являются 2 и 5, но не являются 4 и 10… |
|
dalton Пользователь Сообщений: 32 |
Понятно, но нужно именно как в примере, разве что возможно кроме единицы и наибольшего делителя. |
Первую половину делителей можно как в файле; вторую — получить частные от деления числа на делители. |
|
dalton Пользователь Сообщений: 32 |
#5 30.06.2013 19:16:17 Спасибо, подкорректирую. |
Использование массивов позволяют упростить многие вычисления.
В частности все манипуляции, описанные в статье «Является ли число простым», можно заменить одной формулой.
Пусть в ячейке A1 находится число и нужно проверить простое ли оно. Достаточно в ячейку B1 ввести такую формулу:
=ЕСЛИ(МИН(ОСТАТ(A1;СТРОКА(ДВССЫЛ(«2:»&ОКРУГЛ(КОРЕНЬ(A1);)))))=0;»составное»;»простое»)
Можно пойти еще дальше и записать в ячейке C1 формулу:
=СУММ(—(ОСТАТ(A1;СТРОКА(ДВССЫЛ(«1:»&A1)))=0))
Эта формула покажет сколько у числа в ячейке A1 делителей.
Например, для числа 12 количество делителей будет 6, а именно 1, 2, 3, 4, 6 и само число 12.
Указанные формулы используют массивы, поэтому после окончания ввода нужно нажать CTRL+SHIFT+ENTER.
Похожие по тематике посты — еще почитать:
Поиск делимого и делителя для известного частного |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
Excel для Microsoft 365 Excel для Microsoft 365 для Mac Excel для Интернета Excel 2021 Excel 2021 для Mac Excel 2019 Excel 2019 для Mac Excel 2016 Excel 2016 для Mac Excel 2013 Excel 2010 Excel 2007 Excel для Mac 2011 Excel Starter 2010 Еще…Меньше
В этой статье описаны синтаксис формулы и использование функции НОД в Microsoft Excel.
Описание
Возвращает наибольший общий делитель двух или более целых чисел. Наибольший общий делитель — это наибольшее целое число, на которое делятся число1 и число2 без остатка.
Синтаксис
НОД(число1;[число2];…)
Аргументы функции НОД описаны ниже.
-
Число1, число2,… Число1 является обязательным, последующие числа — нет. От 1 до 255 значений. Если какое-либо из этих чисел не является целым, оно усекается.
Замечания
-
Если какой-либо из аргументов не является числом, возвращается #VALUE! значение ошибки #ЗНАЧ!.
-
Если какой-либо из аргументов меньше нуля, возвращается значение #NUM! значение ошибки #ЗНАЧ!.
-
Единица является делителем любого числа.
-
Простое число делится только само на себя и на единицу.
-
Если параметр для параметра GCD >=2^53, возвращается #NUM! значение ошибки #ЗНАЧ!.
Пример
Скопируйте образец данных из следующей таблицы и вставьте их в ячейку A1 нового листа Excel. Чтобы отобразить результаты формул, выделите их и нажмите клавишу F2, а затем — клавишу ВВОД. При необходимости измените ширину столбцов, чтобы видеть все данные.
Формула |
Описание |
Результат |
=НОД(5; 2) |
Наибольший общий делитель чисел 5 и 2 |
1 |
=НОД(24; 36) |
Наибольший общий делитель чисел 24 и 36 |
12 |
=НОД(7; 1) |
Наибольший общий делитель чисел 7 и 1 |
1 |
=НОД(5; 0) |
Наибольший общий делитель чисел 5 и 0 |
5 |