Из трех заданных чисел подсчитать количество таких, которые при делении на 7 дают остаток 1 - VBA

Узнай цену своей работы

Формулировка задачи:

Напишите в среде Excel макрос, который среди трех чисел а, b и с должен подсчитывать:Количество тех чисел, которые при делении на 7 дают остаток 1. Какое должно быть условие для правильной работы макроса?

Решение задачи: «Из трех заданных чисел подсчитать количество таких, которые при делении на 7 дают остаток 1»

textual
Листинг программы 
Sub main()
a = 1
b = 8
c = 3
MsgBox -(a Mod 7 = 1) - (b Mod 7 = 1) - (c Mod 7 = 1)
End Sub

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

13   голосов , оценка 4.077 из 5
Похожие ответы