М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Kryuchochek02
Kryuchochek02
30.05.2023 20:02 •  Информатика

Информационный объём электронной книги равен 132180 бит. Найди сколько символов содержится в алфавите, с которого написана эта книга, если в ней 33045 символов?

👇
Ответ:
7400316
7400316
30.05.2023

I = 132180 бит

k = 33045 символов

N - ?

N = 2^i

I = k * i

i = I / k

i = 132180  / 33045 = 4 бит - вес одного символа в алфавите

N = 2^{4}

N = 16

В алфавите содержится 16 символов.

4,8(10 оценок)
Открыть все ответы
Ответ:
котан6
котан6
30.05.2023
"Говорильный" аппарат,
Модный гаджет,связи рад.
Фото,видео снимает,
На звонки он отвечает.
                                ( Телефон)

К празднику, всегда "накрыт",
Полон явств и каждый сыт,
Я бюро и секретер,
Есть компьютерный размер.
                                 ( Стол)

Важных данных я хранитель,
Информации носитель,
Гибкая,так что же это?
Я магнитная ?(Дискета)

Я блокнот и память я,
Есть и электронная.
Записи я все веду,
Всё фиксирую и жду.
                         (Записная книжка)

Не пищу и не шуршу,
А с компьютером-дружу.
Я курсором управляю,
И командам
                        (Мышка)

Осенью,я всех встречаю.
Летом,просто отдыхаю.
Весь учебный год-учу,
Дарить знания хочу.
                          (Школа)
4,5(81 оценок)
Ответ:
dimagolovin20
dimagolovin20
30.05.2023
   '     1)Напиши программу, выводящую на экран степени числа 3 в интервале от а до b включительно (а и b задаются пользователем).    
    
Dim a As Integer
Dim b As Integer  
Dim i As Integer    

a = InputBox("Введите а") 
b = InputBox("Введите b")
   
Dim msg As String      
msg = ""   
     
For i = a To b     
       msg = msg &  3 в степени " & i & " равно " & 3 ^ i & vbCrLf    
 Next    

MsgBox(msg)

2)Найти все делители числа 1204.   

Dim i As Integer       
Dim msg As String   
msg = ""      

For i = 1 To 1204  
          If 1204 Mod i = 0 Then      
                  msg = msg & "Число " & i & " является делителем 1204." & vbCrLf                  End If    
Next 
  MsgBox(msg)
4,6(2 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ