Sub MyMid()
a = Range("B3:B14")
n = UBound(a, 1)
s = 0
For i = 1 To n
s = s + a(i, 1)
Next i
Range("E3").Value = s / n
End Sub
<em><u>Можно и короче записать:</u></em>
Sub MyMid2()
Range("E3") = Application.WorksheetFunction.Average(Range("B3:B14"))
End Sub
260000 нужно умножить 1028 получим мб и еще 1028 получим кб
Для завантаження фільмів на сайт YouTube потрібно створити власний канал, який у подальшому буде містити добірку відеофайлів користувача. Користувач може керувати доступом до перегляду кожного з відеофайлів, установлюючи певний рівень конфіденційності.
Значна частина редакторів відео мають засоби для розміщення відеофільмів в Інтернеті, наприклад така програма, як WindowsMovieMaker.
Мультимедійні файли, призначені для розміщення в Інтернеті, називають подкастами, а тих, хто створює такі файли, подкастерами.
Вообще более менее очевидно что нужно поменять максимальное число с минусом и минимальное число с плюсом
это -103 и 2
Посчитаем исходную сумму. Если суммировать попарно (-1+2)+(-3+4)+... = 1+1... = 104/2 = 52
Посчитаем новую сумму с заменой
52- (-104 + 2) + (104 - 2) = 254
Например так:
list = []
for counter in range(5):
list.append(int(input()))
min = list[1]
max = min
for counter in range(5):
if list[counter] < min:
min = list[counter]
if list[counter] > max:
max = list[counter]
print(min, max)