1.Необходимо рассчитать информационный объем одного пикселя для этого используем формулу N=2I, где N – количество цветов в палитре, а I – количество информации на один цвет или пиксель. 32= 2(в пятой степени), отсюда I= 5bit
2.Что бы рассчитать минимальный объем изображения мы должны умножить размер изображения на количество информации на один цвет или пиксель - 128*256*5=163 840 бит
3.В ответе нам необходимо указать в Кбайтах: 163 840 бит /(8*1024)= 20 Кбайт PEFRECT
2.Офигеенно большое. Что улица существует, что существует еще как минимум один человек, что этот человек умеет бегать, что он бежит, что по этой улице возможно бегать, что этот человек бежит именно по улице, и именно по этой.. . что человек может получать информацию, наконец.
Sub m1() Cells.Clear Dim n As Integer, i As Integer, s As Integer n = InputBox("n = ") Cells(1, 1).Value = "n = " + Str(n) ReDim a(1 To n) For i = 1 To n a(i) = InputBox("a(" + Str(i) + ")") Next i Cells(2, 1).Value = "Исходный массив" Range(Cells(3, 1), Cells(3, n)).Value = a s = 0 For i = 1 To n s = s + a(i) Next i Cells(4, 1).Value = "s = " + Str(s) Cells(5, 1).Value = "Полученный массив" For i = 1 To n a(i) = a(i) + s Next i Range(Cells(6, 1), Cells(6, n)).Value = a End Sub
размер изображения 128Х256 пикселей.
N = 32 цвета в палитре.
1.Необходимо рассчитать информационный объем одного пикселя для этого используем формулу N=2I, где N – количество цветов в палитре, а I – количество информации на один цвет или пиксель. 32= 2(в пятой степени), отсюда I= 5bit2.Что бы рассчитать минимальный объем изображения мы должны умножить размер изображения на количество информации на один цвет или пиксель - 128*256*5=163 840 бит
3.В ответе нам необходимо указать в Кбайтах:
163 840 бит /(8*1024)= 20 Кбайт PEFRECT
2.Офигеенно большое. Что улица существует, что существует еще как минимум один человек, что этот человек умеет бегать, что он бежит, что по этой улице возможно бегать, что этот человек бежит именно по улице, и именно по этой.. . что человек может получать информацию, наконец.
3. 1) 12582912 бит = 12582912/8 байт = 1572864 байт =
= 1572864/1024 кбайт = 1536 кбайт = 1536/1024 мбайт = 1,5 мбайт
2) максимальное число различных символов равно
4.64=2⁶ значит 6 бит приходится на 1 символ
6*20=120бит
ответ: 120 бит
Cells.Clear
Dim n As Integer, i As Integer, s As Integer
n = InputBox("n = ")
Cells(1, 1).Value = "n = " + Str(n)
ReDim a(1 To n)
For i = 1 To n
a(i) = InputBox("a(" + Str(i) + ")")
Next i
Cells(2, 1).Value = "Исходный массив"
Range(Cells(3, 1), Cells(3, n)).Value = a
s = 0
For i = 1 To n
s = s + a(i)
Next i
Cells(4, 1).Value = "s = " + Str(s)
Cells(5, 1).Value = "Полученный массив"
For i = 1 To n
a(i) = a(i) + s
Next i
Range(Cells(6, 1), Cells(6, n)).Value = a
End Sub