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

Решите по информатике! (желательно все)
1. напишите определение бита в логическом и алфавитном подходе.
2. сколько существует различных битовых последовательностьей длины 2?
3. есть 512 битовых последовательностей, все они равной длины. какой минимальной длины могут быть эти последовательности?
4. в алфавите индейцев 27 символов. один индеец отправил другому сообщение из 39 символов. сколько бит информации несёт это сообщение?
5. индеец ответил другому индейцу сообщением в 800 бит. сколько символов в сообщении? (мощность алфавита как в 4 )
6. даня отправил маше засекреченное сообщение из 25 символов. это сообщение несёт в себе 100 бит информации. какое максимальное колличество символов может быть в алфавите маши и дани?
7. какое минимальное количество символов может быть в их алфавите?
8. сколько бит несёт сообщение, в котором сказано, что 1 из 2 билетов лотереи - выигрышный?
9. у саши есть коллекция из 64 марок. известно, что 60 из них - с . сколько бит информации несёт сообщение о том, что саша выбрал марку не с городом?

👇
Открыть все ответы
Ответ:
qd1337
qd1337
24.05.2021

program z1;

  var a,b,k,i:integer;

    begin

      k:=0;

      write('Ââåäèòå êîîðäèíàòó à: ');

      read(a);

      write('Ââåäèòå êîîðäèíàòó b: ');

      read(b);

      for i:=a to b do begin

                       if i mod 3=0 then begin

                                           writeln(i);

                                           k:=k+1;

                                         end;

                       end;

      writeln('Количество чисел кратных трём равно ',k);

     readln;

    end.

4,5(72 оценок)
Ответ:
olgastavovaya1
olgastavovaya1
24.05.2021

program z1;

  var a,b,k,i:integer;

    begin

      k:=0;

      write('Ââåäèòå êîîðäèíàòó à: ');

      read(a);

      write('Ââåäèòå êîîðäèíàòó b: ');

      read(b);

      for i:=a to b do begin

                       if i mod 3=0 then begin

                                           writeln(i);

                                           k:=k+1;

                                         end;

                       end;

      writeln('Количество чисел кратных трём равно ',k);

     readln;

    end.

4,4(19 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ