Задача, требующая поразмыслить - Microsoft Office Excel

Джиган · 03.03.2011, 13:31

Ребята, очень нужна помощь по задачке.
Дано натуральное число.
Вычислить кол-во всех цифр числа;
сумму цифр кратных 3;
произведение больше цифры X.

Дали подсказку: чтобы получить цифры в VBA необходимо делить число на 10 (знак "\"), пока оно не станет равно 0. Таким образом остаток - это и будут полученные цифры. И с ними необходимо произвести выше указанные операции.
Всем заранее спасибо.

Hugo121 · 03.03.2011, 13:39

Без деления не годится?

Код:

Sub tt()
x = 1254788963
MsgBox Len(x)
End Sub

IgorGO · 03.03.2011, 13:56

у Вас нет задач по-проще?
об эту можно мозг сломать. даже не знаю, справиться ли кто здесь...

MCH · 03.03.2011, 14:47

похожие темы:
http://www.programmersforum.ru/showthread.php?t=139966
http://www.programmersforum.ru/showthread.php?t=140131

03.03.2011, 13:31	#1
Джиган Регистрация: 07.02.2011 Сообщений: 7	Задача, требующая поразмыслить Ребята, очень нужна помощь по задачке. Дано натуральное число. Вычислить кол-во всех цифр числа; сумму цифр кратных 3; произведение больше цифры X. Дали подсказку: чтобы получить цифры в VBA необходимо делить число на 10 (знак "\"), пока оно не станет равно 0. Таким образом остаток - это и будут полученные цифры. И с ними необходимо произвести выше указанные операции. Всем заранее спасибо.

03.03.2011, 13:39	#2
Hugo121 Старожил Регистрация: 11.05.2010 Сообщений: 5,170	Без деления не годится? Код: `Sub tt() x = 1254788963 MsgBox Len(x) End Sub` webmoney: E265281470651 Z422237915069 R418926282008

03.03.2011, 13:56	#3
IgorGO Новичок СтарожилДжуниор Регистрация: 05.02.2008 Сообщений: 9,487	у Вас нет задач по-проще? об эту можно мозг сломать. даже не знаю, справиться ли кто здесь... Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
webbrowser и proxy требующая пароль	Romer9999	Работа с сетью в Delphi	1	18.04.2010 15:50
Программа Навител Навигатор версия 3.2 не требующая регистрации	Laserboy	Софт	0	29.09.2009 23:53

03.03.2011, 14:47	#4
MCH Форумчанин Регистрация: 21.11.2010 Сообщений: 326	похожие темы: http://www.programmersforum.ru/showthread.php?t=139966 http://www.programmersforum.ru/showthread.php?t=140131