Изменение элементов массива - VB

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

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

Дан массив размера N и целое число K (1 <= K < N). Осуществить сдвиг элементов массива влево на K позиций (при этом AN перейдет в AN–K, AN–1 — в AN–K–1, …, AK+1 — в A1, а исходное значение K первых элементов будет потеряно). Последние K элементов полученного массива положить равными 0.

Решение задачи: «Изменение элементов массива»

textual
Листинг программы
ReDim A(1 To N) As Integer
 
For i = 1 To N - K
   A(i) = A(i + K)
Next
 
For i = N - K + 1 To N
   A(i) = 0
Next

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

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