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

По разным источникам словарь иероглифов"чжунхуа цзыхай" 1994 года издания содержит 85568 или 87019 иероглифов. каждый иероглиф был закодирован минимальным возможным целым количеством бит. какое из значений позволит закодировать все 85568 иероглифов и не позволит закодировать все 87019 иероглифов с равномерного двоичного кода ? варианты ответов 1)177кбайт 2)179кбайт 3)181кбайт 4)183кбайт

👇
Ответ:
Пацивис
Пацивис
21.02.2021
Для кодирования одного иероглифа потребуется:
1. log(2)85568 ≈ 16.38 ≈ 17 бит
2. log(2)87019 ≈ 16.41 ≈ 17 бит
Для кодирования всех иероглифов:
1. 85568*17 бит = 85568*17/8/1024 Кбайт ≈ 177.6 Кбайт 
2. 87019*17 бит = 87019*17/8/1024 Кбайт ≈ 180,6 Кбайт
ответ: 2)179 Кбайт
4,4(45 оценок)
Открыть все ответы
Ответ:
Volosyaka
Volosyaka
21.02.2021
4)
var
    a, b: integer;

function max(a, b: integer): integer;
begin
    if a > b then max := a else max := b;
end;

begin
    readln(a, b);
    writeln(max(a, 2 * b) * max(2 * a - b, b));
end.

5)
const
    n = 10;

var
    a: array[1..n] of integer;
    i, s: integer;

begin
    for i := 1 to n do
    begin
        readln(a[i]);
        if i mod 2 = 0 then s := s + a[i];
    end;
    writeln(s);
end.

6)
const
    handsfree = false;

var
    a: array[1..100, 1..100] of real;
    product: real;
    i, j, m, n: integer;

begin
    {ввод матрицы}
    if handsfree then begin
        n := random(20) + 2;
        m := random(20) + 2;
    end
    else begin
        write('n, m =');
        readln(n, m);
    end;
    
    writeln('Данные матрицы:');
    for i := 1 to m do
    begin
        for j := 1 to n do
            if handsfree then begin
                a[i, j] := random(100) - 50;
                write(a[i, j]:4, ' ')
            end
            else
                read(a[i, j]);
        writeln;
    end;
    
    product := 1;
    for i := 1 to m do
        for j := 1 to n do
            if a[i, j] > 0 then
                product := product * a[i, j];
    writeln('product = ', product);
end.
4,4(39 оценок)
Ответ:
Kisylyaaa
Kisylyaaa
21.02.2021
Вот: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 const   n=5; var   a: array[1..n,1..n] of integer;   i,j,s: integer; begin   s: =0;   randomize;   for i: =1 to n do     begin       for j: =1 to n do         begin           a[i,j]: =random(10);           write(a[i,j]: 4);           if (i+j) mod 3=0 then             s: =s+a[i,j];         end;       writeln;     end;   writeln('s=',s); end.
4,5(93 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ