check comment ( pls delete )
Сначала поменять букву н на букву д, затем букву о на букву е, дальше букву ч на букву н.
Ответ:
это информация, которая может быть тебе полезной, Например: человек рассказал тебе что и как нужно делать при пожаре, (при случае пожара тебя эта информация может спасти)
То есть такой рассказ или объяснение которое тебе нужно и нужно всем людям.
Объяснение:
Sub aaa()
s = InputBox("Введите текст")
s = Replace(s, "к", "", , , vbTextCompare)
MsgBox s
End Sub
<u>Если нужна отдельная процедура для замены:</u>
Sub ReplKk(s As String)
s = Replace(s, "к", "", , , vbTextCompare)
End Sub
Sub Test()
Dim s As String
s = InputBox("Введите текст")
ReplKk s
MsgBox s
End Sub
V = K * I, где:
V - объем.
K - размер изображения.
I - количество бит на цвет.
N = 2^i, где:
N - количество цветов.
Дано:
I1 = 24 бит.
N2 = 16 цветов.
Найти: V1/V2.
Найдем количество бит на цвет при вторичном сохранении:
N = 2^i.
16 = 2^i.
I2 = 4 бита.
Найдем во сколько раз одно изображение больше другого.
V1/V2 = (K * I1)/(K * I2).
Так как сохраняем тот же рисунок, то размер изображения не меняется, его можно сократить.
V1/V2 = I1/I2.
V1/V2 = 24/4.
V1/V2 = 6.
Ответ: объем изменился в 6 раз.