Kristina17217
23.05.2023 20:11

Задание 1
Через ADSL-соединение файл размером 0,25 Мбайт передавался 8 секунд. Сколько
секунд потребуется для передачи файла размером 800 Кбайт?
Задание 2
Модем передаёт данные со скоростью 1Мбит/сек. Передача текстового файла заняла
30 секунд. Определите, сколько страниц содержал переданный текст, если известно, что он
был представлен в кодировке Unicode, а на одной странице – 3072 символа?
Задание 3
Какое количество байтов будет передаваться за 1 секунду. По каналу с пропускной Кбит/с?
Задание 4
Пропускная канала связи 1 Мбит/с. Канал не подвержен воздействию
шума (например, оптоволоконная линия). Определите, за какое время будет передан файл
объемом 2 Мбайт.
Задание 5
Пропускная канала связи 1 Мбит/с. Канал подвержен воздействию
шума, поэтому избыточность кода передачи составляет 20%. Определите, за какое время
будет передан файл объемом 2 Мбайт.
Задание 6
Документ объемом 5 Мбайт можно передать с одного компьютера на другой двумя А) Сжать архиватором, передать архив по каналу связи, распаковать.
Б) Передать по каналу связи без использования архиватора.
Какой быстрее и насколько, если
 средняя скорость передачи данных по каналу связи составляет 222 бит в
секунду,
 объем сжатого архиватором документа равен 20% от исходного,
 время, требуемое на сжатие документа — 8 секунд, на распаковку – 2
секунды?

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
777495
23.02.2021 21:50
// PascalABC.NET 3.0, сборка 1157 от 02.02.2016
begin
  var n:=ReadInteger('n=');
  if n<0 then Writeln(n,'! не определено: n<0')
  else
    if n=0 then Writeln('0!=1')
    else begin
      var p:BigInteger:=1;
      for var i:=2 to n do p*=i;
      Writeln(n,'!=',p)
      end
end.

Тестовое решение:
n= 138
138!=691778647261948849222819828311491035886734385827028118707676848307166514238979223884785249055995983385450621636277440066920043595627074569065446040152660143904127838730788278294186615891819670506731208704000000000000000000000000000000000
0,0(0 оценок)
Ответ:
verarusu02
06.05.2023 07:22
// PascalABC.NET 3.0, сборка 1157 от 02.02.2016
begin
  var a:array[1..20] of integer;
  Randomize;
  for var i:=1 to 20 do a[i]:=Random(-50,50); a.Println;
  var b:=Range(2,20,2).Select(i->a[i]);
  Writeln('Элементы с четными индексами по возрастанию');
  b.Sorted.Println;
  Writeln('Элементы с четными индексами по убыванию');
  b.SortedDescending.Println;
end.

Тестовое решение:
-15 46 -34 -3 43 16 -17 -28 -19 12 -28 -11 48 -12 -1 33 -37 9 6 -40
Элементы с четными индексами по возрастанию
-40 -28 -12 -11 -3 9 12 16 33 46
Элементы с четными индексами по убыванию
46 33 16 12 9 -3 -11 -12 -28 -40
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота