Создать массив согласно условию - VBA
Формулировка задачи:
Создать массив, на четных местах в которых стоят единицы, а на нечетных местах - числа, равные остатку от деления своего номера на 5. Често скажу ,сам вообще не пойму как решить,в техе препод ни какого материала не предоставляет для того что бы решать, сам еще чайник.Ищу подмоги тут,буду благодарен!
Решение задачи: «Создать массив согласно условию»
textual
Листинг программы
Sub massiv() Dim arr(10) As Integer Dim i As Integer For i = 0 To UBound(arr) If i Mod 2 = 0 Then arr(i) = 1 Else arr(i) = i Mod 5 End If Next End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д