1. что такое алфавит ? 2.что такое мощность алфавита ? з. как отределяется информационный объем текста при использовании алфавитного подхода ? 4 . текст составлен с использованием алфавита мощностью 64 символа и содержит 100 символов. каков информационный объем текста ? 5. что такое байт , килобайт , мегабайт , гигабайт ? 6. информационный объем текста , подготовленного с компьютера , равен 3,5 кб . сколько символов содержит этот текст ? 7. два текста содержат одинаковое количество символов . первый текст составлен в алфавите мощностью 32 символа , второй мощностью 64 символа . во сколько раз различаются информационные объемы этих текстов ?

👇

Ответ:

slavasolyanin

11.05.2021

1. Алфавит - это форма письменности, основанная на стандартном наборе знаков.
2. Мощность алфавита - это кол-во символов в нём
3. Ic=i*k , Ic – количество информации в сообщении, i – количество информации которое несет один знак, k – количество знаков в сообщении
4. Т.к. каждый символ может иметь 64 значения, то есть 2^{6} , то на каждый символ выделяется 6 бит(от 0 до 63, всего 64 варианта).Всего символов - 100. Значит всего нужно 6*100=600бит=75байт.
5. Это единицы размера полученной и переданной информации и размера файла.
Килобайт = 1024 байт
Мегабайт = 1024 килобайт
Гигабайт = 1024 мегабайт
6. Дано: текст 3.5 килобайта

Найти: количество символов в тексте

Решение: Итак, текста у нас 3.5 килобайта

Переведём в байты:

3.5 кбайта * 1024 байт\килобайте = 3584 байт.

Так как кодировка не указана выбираем саму распространенную при обучении однобайтовую, тогда символ занимает ровно один байт и значит у нас

3584 символа. Если же используется двухбайтная кодировка, то 3584/2 = 1792 символа

ответ: 3584 для одного байта на символ или 1792 сиволов для двух байтной кодировки.
7. В первом тексте информационный объем одного символа составляет

N=2^i

32=2^5

i=5 бит

Во втором текте

64=2^6

i=6

Значит, в 1,2 раза (6:5=1,2)

4,4(29 оценок)

Открыть все ответы

Ответ:

KatherinePirs

11.05.2021

делаешь по Блок схемам.

например 1 вариант.

Паскаль

1-ая блок схема.

b=12; c=0

2-ая блок схема.

b=4

5-ая блок схема -> Если да то Конец.

Если нет,то:

3-ая блок схема.

с= с+b

b=b-2

4-ая блок схема.

Тут надо решать.

То есть значения из 1 схемы.

Подставляешь по формуле 3 схемы.

Должно получится

с= 0+12= 12

b= 12-2= 10

b=10

по 2 блок схеме b=4,то есть не подходит, итак решаем дальше,пока не получится b=4.

но по условии тебе надо написать чему будет равно "с"

То есть,когда у тебя получается b=4, то "с" у тебя должно будет =36.

4,5(53 оценок)

Ответ:

maks110994

11.05.2021

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ArrRandom(ReadInteger('n='),-11,11); a.Println;
// 1
begin
    var s:=a.Where(t->t<0);
    if s.Count=0 then
      Writeln('1. Нет отрицательных элементов')
    else
      Writeln('1. Первый отрицательный элемент номер ',
          a.IndexOf(s.First)+1)
end;
// 2
begin
    var s:=a.Select((v,i)->(v,i)).Where(t->(t[0]>0) and t[0].IsEven);
    if s.Count=0 then
      Writeln('2. Нет четных положительных элементов')
    else begin
      var r:=s.Last;
      Writeln('2. Последний четный положительный элемент номер ',r[1]+1,
          ', значение ',r[0])
      end
end;
// 3
begin
    var s:=a.Select((v,i)->(v,i)).Where(t->t[0] mod 5=0);
    if s.Count<2 then
      Writeln('3. Нет двух элементов, кратных 5')
    else
      Writeln('3. Номер второго элемента, кратного 5, равен ',
          (s.Skip(1).Take(1)).First[1]+1)
end;
// 4
begin
    var s:=a.Select((v,i)->(v,i)).Where(t->t[0]=0);
    if s.Count<3 then
      Writeln('4. Нет трех нулевых элементов')
    else begin
      s:=s.Skip(1).Take(2);
      Writeln('4. Количество положительных элементов между ',
          'вторым и третьим нулевыми элементами равно ',
          a[s.First[1]+1:s.Last[1]].Where(t->t>0).Count)
      end
end;
// 5
begin
    var s:=a.IndexesOf(t->t>0).Take(4).Select(t->t+1);
    if s.Count<4 then
      Writeln('5. Нет четырех положительных элементов')
    else begin
      Write('5. Номера первых четырех положительных элементов: ');
      s.Println
      end
end;
// 6
begin
    var s:=a.IndexesOf(t->t<0);
    if s.Count=0 then
      Writeln('6. Нет отрицательных элементов')
    else
      Writeln('6. Номера первого и последнего отрицательных элементов: ',
          s.First+1,' ',s.Last+1)
end;
// 7
begin
    var s:=a.IndexesOf(t->t>0);
    if s.Count=0 then
      Writeln('7. Нет положительных элементов')
    else begin
      var i1:=s.First;
      s:=a.IndexesOf(t->t<0);
      if s.Count=0 then
        Writeln('7. Нет отрицательных элементов')
      else begin
        var i2:=s.Last;
        Writeln('7. Количество четных элементов между первым ',
            'положительным и последним отрицательными элементами: ',
            a?[i1+1:i2].Where(t->t.IsEven).Count)
        end
      end
end
end.

Кто, что сможет. решите, на паскале 2а.1. найти номер первого отрицательного элемента массива. 2а.2.