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

При составлении сообщения использовали 128-символьный алфавит.каким будет информационный объем такого сообщения,если оно содержит 2048 символов?

👇
Ответ:
romatrapkin9091
romatrapkin9091
13.09.2022
2^n=128
n=7 бит
2048*7=14336 бит
4,4(64 оценок)
Открыть все ответы
Ответ:
kayumovtanvir89
kayumovtanvir89
13.09.2022
Var n, a, pos, neg, null, i: integer;
 begin
  pos := 0;
  neg := 0;
  null := 0;
  writeln('Введите N:');
  readln(n);
  writeln('Введите N целых чисел:');
  for i := 1 to n do
   begin
    read(a);
    if(a < 0) then neg := neg + 1;
    if(a > 0) then pos := pos + 1;
    if(a = 0) then null := null + 1;
  end;
  writeln('Положительных чисел: ', pos);
  writeln('Отрицательных чисел: ', neg);
  writeln('Нулей: ', null);
end.
Тестовые решения:
1)ввод
8
1 2 0 3 0 -5 -4 2
вывод
Положительных чисел: 4
Отрицательных чисел: 2
Нулей: 2
2)ввод
6
0 0 3 -5 0 22
вывод
Положительных чисел: 2
Отрицательных чисел: 1
Нулей: 3
4,4(23 оценок)
Ответ:
Electron57
Electron57
13.09.2022
Код вот такой, блок-схему сможешь написать по комментам

var  a: array [1..100] of integer;  n, i, max, min: integer;  ans: real;
begin  writeln('Введите кол-во эллементов массива (от 1 до 100)');  readln(n); // cчитывается кол-во элементов  read(a[1]); // cчитывается первый элемент массива
  max := a[1]; //a[1] принимается за максимальный элемент  min := a[1]; //a[1] принимается за минимальный элемент
  for i := 2 to n do begin // цикл от 2 до n    read(a[i]); // cчитывается i-тый элемент массива    if (max < a[i]) then // если max меньше нового эллемента обновить max      max := a[i]    else if (min > a[i]) then // если min больше нового эллемента обновить min      min := a[i];  end;
  ans := max / min; //присвоить переменной ans ответ на задачу
  writeln(ans); // вывести ответ
end.
4,5(11 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ