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

1)сколько бит информации содержится в устном сообщении - петя живёт в 164-й квартире 320- квартирного дома ? 2) сколько бит информации содержится у сеном сообщении - из игральной колоды вытащили (54 карты ) наугад вытащили трефового туза девятку ? 3) проводятся две лотереи : 6из 66и 5 из 55 сколько бит информации содержится в устных сообщениях результат лотереи : 4,12,14,37,49,50 и результат лотыреи 7,12,30,44,54

👇
Ответ:
leafpool1
leafpool1
11.03.2021
В Unicode один символ весит 2 байта, или 16 бит. посчитай количество символов, включая пробелы и запятые и умножь на 16.
4,4(44 оценок)
Открыть все ответы
Ответ:
fantastik03
fantastik03
11.03.2021
//PascalABC.Net 3.0, сборка 1064
var
  s,w:string;
begin
  Write('Введите предложение: '); Readln(s);
  Write('Введите искомое слово: '); Readln(w);
  s:=' '+s+' ';
  if Pos(' '+w+' ',s)>0 then Writeln('Слово входит в предложение')
  else Writeln('Слово не входит в предложение')
end.

Тестовые решения:
Введите предложение: А роза упала на лапу Азора
Введите искомое слово: роза
Слово входит в предложение

Введите предложение: Вчера смотрели старую кинопанораму
Введите искомое слово: кино
Слово не входит в предложение

Введите предложение: Интересное было кино или так себе?
Введите искомое слово: кино
Слово входит в предложение

Замечание: В программе было обращено внимание на то, что "слово" не может быть частью другого слова, а должно являться самостоятельным членом предложения. В противном случае принято говорить не о слове, а о  контексте (подстроке)
4,4(100 оценок)
Ответ:
irashmoylbwg
irashmoylbwg
11.03.2021
Var
  a,b,h,x,y:real;
begin
  writeln('Введите начальное значение, шаг, конечное значение');
  readln(a,h,b);
  x:=a;
  while x<=b do begin
    y:=0.5/tan(x/4)+4;
    writeln(x:7:3,y:10:5);
    x:=x+h
  end
end.

Тестовое решение:

Введите начальное значение, шаг, конечное значение
-5 0.5 5
 -5.000   3.83386
 -4.500   3.76106
 -4.000   3.67895
 -3.500   3.58244
 -3.000   3.46329
 -2.500   3.30698
 -2.000   3.08476
 -1.500   2.72976
 -1.000   2.04184
 -0.500   0.02086
  0.000  Infinity
  0.500   7.97914
  1.000   5.95816
  1.500   5.27024
  2.000   4.91524
  2.500   4.69302
  3.000   4.53671
  3.500   4.41756
  4.000   4.32105
  4.500   4.23894
  5.000   4.16614
4,8(80 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ