Возможна ли Блок-схема по данному макросу(Excel) - VBA

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

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

Возможна ли Блок-схема по данному макросу(Excel):
Листинг программы
  1. Private Sub CommandButton1_Click()
  2. Dim a As Single, b As Single, c As Single
  3. Dim k As Integer
  4. a = Val(TextBox1)
  5. b = Val(TextBox2)
  6. c = Val(TextBox3)
  7. k = 0
  8. If a Mod 7 = 1 Then k = k + 1
  9. If b Mod 7 = 1 Then k = k + 1
  10. If c Mod 7 = 1 Then k = k + 1
  11. Label4.Caption = "Количество тех чисел,которые при делении на 7 дают остаток 1. РАВНО:" & k
  12. End Sub

Решение задачи: «Возможна ли Блок-схема по данному макросу(Excel)»

textual
Листинг программы
  1. Label4.Caption = "Количество тех чисел,которые при делении на 7 дают остаток 1. РАВНО:" & k

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


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

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

5   голосов , оценка 4.2 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут