Найти среднее арифметическое последних К и первых L элементов одномерного массива Z размерности N - VB
Формулировка задачи:
Задание состоит в следующем:
"Найти среднее арифметическое последних К и первых L элементов одномерного массива Z размерности
N."
Я не знаю как выделить часть элементов массива, т.е. например первых L элементов из массива.
Как это сделать я не могу понять, пытался пользоваться поиском, но ни чего подобного не нашёл. Нашёл для одномерных массивов только среднее арифметическое чётных/нечёных и т.п.
Если будет хоть часть кода, например на поиск среднего арифметического первых L элементов, мне будет это достаточно. В теории после этого собираюсь записать массив в обратном порядке и уже найти среднее арифметическое для последних элементов (которые стали первыми). ну и дальше ср. ариф. для получившихся значений средних арифметических от двух случаев. Хотя по идеи эта задача должна решаться легче.
Решение задачи: «Найти среднее арифметическое последних К и первых L элементов одномерного массива Z размерности N»
textual
Листинг программы
dim z as long,l as long,k as long,i as long,s as long z=10'z=inputbox("z=") l=3'l=inputbox("l=") k=4'k=inputbox("k=") redim a(1to z)as long for i=1to z a(i)=int(rnd*z) if i<=l or i>z-k then s=s+a(i) debug.?a(i),s next msgbox s/(k+l)
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д