Когда щелкнут по
повторить 25
идти 10 шагов
ждать 0,2 секунд
передать Светло!
дам за это ​

N 1

1. 3 кбайт = 2048 байт + 7616 бит

  

 переводим 3 кбайта в байты

 A = 3 * 1000 = 3000 байт

 вычитаем любое кол-во байтов и переводим в биты (при условии C < B, C - любое      значение)

предположим С = 952

 

получаем 3 кбайт = 2048 байт + 952 * 8 бит

ответ - выше

------------

 

2. 2,56 кбайт = 2560 байт = 20480 бит

 

Решение

   20480 / 8 = 2560 / 1000 = 2,56 кбайт

------------

 

N 2

Длинная строки полученной телеграммы " встречайте вагон7 " (если вы не напутали с пробелами и расстановкой цифры) равна 19 символов (пробел тоже символ), как нам известно размер одного символа равен 8 битам или 1 байту

 

Производим обычную арифметическую операцию:

 19 * 1 = 19 байт (объем сообщения) или 19 * 8 = 152 бит 

 

N 3 

тоесть 6 бит на один символ, а значит

860 * 6 = 5160 / 8 = 645 / 1000 = 0,645 кбайт

 

N 4 

Там предоставлены две кодировки, вам нужно сравнить таблицы кодировок

 

N5

Фаил = 30 кбайт 

1стр = 30 * 64 = 1,92 кбайт

округлим размер одной страницы и получим 2

Кол-во страниц = 30 / 1,92 = 15,625 окгругляем вверх

ответ 15 страниц

 

 

 

 

Const
  n = 15;

var
  x: array[1..n] of integer;
  i, min, max: integer;

begin
  Randomize;
  Writeln('Элементы массива');
  min := 32767; max := -32768;
  for i := 1 to n do
  begin
    x[i] := Random(101) - 50;
    Write(x[i]:4);
    if (x[i] > 0) and (min > x[i]) then min := x[i]
    else
    if (x[i] < 0) and (max < x[i]) then max := x[i]
  end;
  Writeln;
  Writeln('Min=', min, ', max=', max)
end.

Тестовое решение:
Элементы массива
  29 -28 -14 -46 -22  13  -6  16  24 -47  -1  39  49  47 -23
Min=13, max=-1

const
  n = 15;

var
  x: array[1..n] of integer;
  i, max, max1: integer;

begin
  Randomize;
  Writeln('Элементы массива');
  max := -32768; max1 := max;
  for i := 1 to n do
  begin
    x[i] := Random(100);
    Write(x[i]:3);
    if max < x[i] then begin max1 := max; max := x[i] end
    else
    if max1 < x[i] then max1 := x[i]
  end;
  Writeln;
  Writeln('Второй максимум равен ', max1)
end.

Тестовое решение:
Элементы массива
 37 66 92 11 39 32 70 17 28 80 51 37  1 56 41
Второй максимум равен 80