Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 08.12.2009, 15:02   #1
Маринка777
Пользователь
 
Регистрация: 29.11.2009
Сообщений: 12
По умолчанию функции

1.Определите, является ли четным/нечетным заданное трехзначное число.
2.Определите ранг числа в ряду из 10 неупорядоченных значений.
3.Определите сумму цифр целого положительного числа.
4.Проверьте, является содержимое ячейки текстом или числом, и подсчитайте количество ячеек области, содержащих текст или числовые значения.


какакими примерно функциями тут пользоваться?
Маринка777 вне форума Ответить с цитированием
Старый 08.12.2009, 15:10   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

1) Эта формула определяет, является ли число чётным:
Код:
  Ячейка: B1      Формула  (стиль A1):   =ОСТАТ(A1;2)=0
                  Формула  (стиль R1C1): =ОСТАТ(RC[-1];2)=0
2) =РАНГ(RC[-2];R1C1:R5C1)

См. пример:



3) пользуемся поиском по форуму - ключевая фраза Сумма цифр
http://www.programmersforum.ru/showt...0+%F6%E8%F4%F0
http://www.programmersforum.ru/showt...0+%F6%E8%F4%F0
http://www.programmersforum.ru/showt...0+%F6%E8%F4%F0

Вообще, это надо сделать формулами, или макросами?

4)
Код:

проверка на наличие в ячейке текста
  Ячейка: B1      Формула  (стиль A1):   =ЕТЕКСТ(A1)
                  Формула  (стиль R1C1): =ЕТЕКСТ(RC[-1])

проверка на наличие в ячейке числа
  Ячейка: C1      Формула  (стиль A1):   =ЕЧИСЛО(A1)
                  Формула  (стиль R1C1): =ЕЧИСЛО(RC[-2])

подсчёт количества ячеек с текстом в диапазоне ячеек A1:A7
  Ячейка: D1      Формула  (стиль A1):   =СУММПРОИЗВ(--ЕТЕКСТ($A$1:$A$7))
                  Формула  (стиль R1C1): =СУММПРОИЗВ(--ЕТЕКСТ(R1C1:R7C1))

подсчёт количества ячеек с числами в диапазоне ячеек A1:A7
  Ячейка: E1      Формула  (стиль A1):   =СУММПРОИЗВ(--ЕЧИСЛО($A$1:$A$7))
                  Формула  (стиль R1C1): =СУММПРОИЗВ(--ЕЧИСЛО(R1C1:R7C1))

Последний раз редактировалось EducatedFool; 08.12.2009 в 15:32.
EducatedFool вне форума Ответить с цитированием
Старый 08.12.2009, 15:11   #3
Xpoft
Пользователь
 
Регистрация: 25.11.2009
Сообщений: 55
По умолчанию

Вот пример работы с цифрами числа: ищется сумма степеней цифр числа, где степень определяется по количеству знаков числа.
Код:
Sub Armstrong()
Row = 1
For i = 10 To 9999
    temp = i
    Arms = 0
    For c = 1 To Len(i)
        nums = Left(temp, 1)
        temp = Right(temp, Len(temp) - 1)
        Arms = Arms + nums ^ Len(i)
    Next c
    If Arms = i Then
        Cells(Row, 1).Value = i
        Row = Row + 1
    End If
Next i
End Sub
Будут конкретные вопросы, спрашивайте.
Не бывает сложных задач, бывают сложные решения
Xpoft вне форума Ответить с цитированием
Старый 08.12.2009, 17:00   #4
Маринка777
Пользователь
 
Регистрация: 29.11.2009
Сообщений: 12
По умолчанию

ой... спасибо большое..разобралась)))
а вот тут?

1.Определите минимальное значение из 10 чисел без учета нулевых значений.(как не учитывать нулевые значения)
2.Выполните раздельное суммирование положительных и отрицательных чисел из ряда значений.
3.Вычислите среднее арифметическое 10 чисел без учета максимального и минимального значений.
4.Определите возраст человека на текущую дату.
5.Определите частоту появления значения в области из 25 чисел.
(желательно в формулах)
Маринка777 вне форума Ответить с цитированием
Старый 08.12.2009, 17:05   #5
DV68
Форумчанин
 
Регистрация: 05.08.2009
Сообщений: 465
По умолчанию

Как дополнение:
1)является ли число четным или нечетным можно формулами: ЕЧЁТН и ЕНЕЧЁТ;
4)подсчёт количества ячеек с числами в диапазоне ячеек A1:A7:
СЧЁТ(A1:A7)
подсчёт количества ячеек с текстом в диапазоне ячеек A1:A7:
=СЧЁТЗ(A1:A7)-СЧЁТ(A1:A7)
"Все следует делать настолько простым, насколько это возможно, но не проще." Альберт Эйнштейн
DV68 вне форума Ответить с цитированием
Старый 08.12.2009, 17:35   #6
The_Prist
Участник клуба
 
Аватар для The_Prist
 
Регистрация: 17.07.2009
Сообщений: 1,088
По умолчанию

Все в файле.

P.S. Маринка, а вообще-то учиться надо. На экзаменах нет форума
Вложения
Тип файла: rar Задачки.rar (6.5 Кб, 28 просмотров)
WebMoney - R298726502453; Яндекс.Деньги - 41001332272872
www.excel-vba.ru
The_Prist вне форума Ответить с цитированием
Старый 08.12.2009, 18:48   #7
DV68
Форумчанин
 
Регистрация: 05.08.2009
Сообщений: 465
По умолчанию

Если вдруг формулы массива не проходили , то:
1.=НАИМЕНЬШИЙ(A1:A9;СЧЁТЕСЛИ(A1:A9; 0)+1)
2. а)=СУММЕСЛИ(A1:A21;"<"&0)
б)=СУММЕСЛИ(A1:A21;">"&0)
"Все следует делать настолько простым, насколько это возможно, но не проще." Альберт Эйнштейн
DV68 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Функции Syltan Общие вопросы C/C++ 9 28.08.2009 18:36
Чем отличается описание функции от определения функции в С++? Go6a Помощь студентам 4 18.07.2009 18:07
Функции С++ ppunisher Помощь студентам 0 22.06.2009 17:55
функции surovii Помощь студентам 10 28.03.2009 13:12
Функции. Передача массива в качестве параметра функции. Wia Помощь студентам 2 17.03.2009 14:57