Массив: Вывести на печать все числа до нуля включительно - VBA
Формулировка задачи:
Дана последовательность чисел, среди которых имеется один нуль. Вывести на печать все числа до нуля включительно.
Решение задачи: «Массив: Вывести на печать все числа до нуля включительно»
textual
Листинг программы
- a = Array(40, 20, 1, 20, 0, 4, 10, 34, 10)
- i = LBound(a) - 1
- Cls
- Do
- i = i + 1
- Print a(i); vbTab;
- Loop Until a(i) = 0 Or i = UBound(a)
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
