источник получения информации: книга, интернет, газета и журнал.
Высказывание "<span>Я мыслю, следовательно, существую." состоит из 34 символов. Объем = 34*1 байт = 34*8 бит = 272 бита.</span>
Точно в 10 степени? а то если да то там получается большое число<span />
Выделите на листе прямоугольную область ячеек с левым верхним углов в A1 и запустите программу, которая в каждой строке выделенной области обменяет местами содержимое ячеек с минимальным и максимальным значениями.
Sub abc()
a = Selection.Value
For i = 1 To UBound(a, 1)
aMin = a(i, 1): aMax = aMin
jMin = 1: jMax = 1
For j = 2 To UBound(a, 2)
If aMin > a(i, j) Then
aMin = a(i, j): jMin = j
End If
If aMax < a(i, j) Then
aMax = a(i, j): jMax = j
End If
Next j
Cells(i, jMin).Value = aMax
Cells(i, jMax).Value = aMin
Next i
End Sub
в мегабайтах будет в 1024 раза меньше,
в килобайтах в 1024*1024 раза меньше,
в гигабайтах в 1024*1024*1024 раза меньше,
в терабайтах в 1024*1024*1024*1024 раза меньше.
вот и все