1. Сколько килобайтов составляет сообщение, содержащее 40960 битов? 2. Сколько Мбайт составляет сообщение, содержащее 2 000 000бит?
3. В барабане для розыгрыша лотереи находится 32 шара. Сколько информации содержит сообщение о первом выпавшем номере?
4. При угадывании целого числа в диапазоне от 1 до N было получено 9 бит информации. Чему равно N?
5. Какой объем информации содержит страница текста, набранного с компьютера, на которой 60 строк по 70 символов? (1 Кбайт ≈ 1000 байт)
6. Какой объем информации содержит учебник, набранный с компьютера, если в нем 250 страниц, на которых 60 строк по 50 символов? (Выразить в Мбайт)
7. Сообщение, записанное буквами из 64-символьного алфавита, содержит 50 символов. Какой объем информации оно несет?
8. Мощность некоторого алфавита равна 256. Какой объем информации содержится на странице, в которой 60 строк по 90 символов в строке? (Выразить в байтах)
9. Сколько байтов составит сообщение из 512 символов 128-символьного алфавита?

👇

Увидеть ответ

Ответ:

ruchina89

04.04.2020

1. 5,12

2.0.25

3. i=5

4. 512

5. V= 60×70×1=4200= 4.2

6. V=250×60×50×1=750000=0,0938

7. V=n*i, N=2i (2 в степени i)

64=2 в степени 6. Отсюда i=6

V=50*6=300 бит

8. 256 это 2 в 8 степени.

1) 90* 60 * 8 = 43200 бит.

2) 43200/ 8 = 5400 байт.

ответ: 5400

9. 128=2 в степени 7

7×512 =3584 бит= 448 байт

4,8(25 оценок)

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

Ответ:

Delishte

04.04.2020

Const
lim = 11;

type
V = array[1..lim] of integer;

function FirstNegative(a: V; n: integer): integer;
var
i: integer;
begin
i := 0;
Result := 0;
repeat
    i := i + 1;
    if a[i] < 0 then Result := i
until (Result > 0) or (i > lim)
end;

procedure InpMass(var a: V; var n: integer; mName: string);
// Организует ввод массива
var
i, p: integer;
begin
writeln('Вводите элементы массива ' + mName + '; 7777 - конец ввода');
i := 0;
repeat
    read(p);
    i := i + 1;
    if p <> 7777 then a[i] := p;
until (p = 7777) or (i > lim);
n := i - 1
end;

var
a, b: V;
m, n, p, q: integer;

begin
InpMass(a, m, 'A');
InpMass(b, n, 'B');
p := FirstNegative(a, m);
q := FirstNegative(b, n);
if p <= q then writeln('Номер первого отрицательного элемента в массива А: ', p)
else writeln('Номер первого отрицательного элемента в массива B: ', q)
end.

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

Вводите элементы массива A; 7777 - конец ввода
37 14 -25 32 30 -29 38 27 7777
Вводите элементы массива B; 7777 - конец ввода
33 -36   23 -17   -3 -16 -33   33 -48 -39   30 7777
Номер первого отрицательного элемента в массива B: 2

4,7(41 оценок)

Ответ:

Alisa010303

04.04.2020

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

begin
Writeln('*** Исходный массив ***');
var a:=MatrRandom(5,5,-50,50);
a.Println(4); Writeln(4*a.ColCount*'-');
Writeln('*** Транспонированный массив ***');
a:=Transpose(a); a.Println(4)
end.

Пример
*** Исходный массив ***
40 -31 16 -27 -3
34 -37   0 -33 -8
-16 -44 -38 19 -22
-32 36 -22 42 -17
-31 20 36   8   9

*** Транспонированный массив ***
40 34 -16 -32 -31
-31 -37 -44 36 20
16   0 -38 -22 36
-27 -33 19 42   8
-3 -8 -22 -17   9

4,7(75 оценок)

Это интересно:

Финансы-и-бизнес

06.04.2020

Как купить золото...

Транспорт

04.06.2020

Не дайте окислившимся клеммам аккумулятора испортить ваш автомобиль...

03.03.2020

Как собрать обед для ребенка: советы от нутрициологов...

Компьютеры-и-электроника

14.07.2020