Вывести элементы массива с нечетными номерами в порядке убывания номера - VB
Формулировка задачи:
Дан массив A размера N (N — нечетное число). Вывести его элементы с нечетными номерами в порядке убывания номеров: AN, AN−2, AN−4, …, A1. Условный оператор не использовать.
Решение задачи: «Вывести элементы массива с нечетными номерами в порядке убывания номера»
textual
Листинг программы
Option Explicit Dim i%, N% Private Sub com1_Click() Randomize Timer N = Val(txtT.Text) ReDim A%(N) For i = 1 To N A(i) = 40 * Rnd Print Format(A(i), " 00"); Next Print: Print For i = N To 1 Step -2 Print Format(A(i), " 00"); Next End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д