Нуу
1 - 33 буквы
2 - двоичный код
3 - ноты
Часть первая 1 задание файлы документов,2 файловые вирусы,3 макровирусов,4 жёсткий диск,5 неопастные,безвредные,опасные,очень опасные
Изображение прикреплено. Формула написана наверху.
Программа работает в следующем виде:
n = InputBox(vbLf & "Напиши значение ""n"" (количество расчетов)")
ReDim X(n)
ReDim Y(n)
Randomize
For i = 1 To n
X(i) = 5 - 10 * Rnd
Next
S = 0
For Each b In X
S = S + X(1) / i
Next
MsgBox "S=" & S
Нижние строки я убрал, потому что не понял, зачем они и что должны выводить: в задании про них ничего не сказано.
У нас имеется страниц - 2. В каждой 32 строки по 64 символа, значит общее количество символов будет 2*32*64 = 4096.
Теперь количество наших символов умножаем на информационный объем за символ, то есть для Unicode это 16 бит за символ.
4096 символов* 16 бит = 65536 бит.
8 бит = 1 байт.
1024 байта = 1 Кбайт
65536 бит / 8 = 8192 байта / 1024 = 8 Кбайт.
Ответ: 3) 8 Кб