решить. Никак не получается У Васи есть высокоскоростной доступ к сети Интернет со скоростью 2^22бит/сек.
Петин компьютер связан с Васиным через канал связи со скоростью 2^19 бит/сек. Петя
договорился с Васей, что тот будет скачивать для него данные объёмом 8 Мбайт из Интернета и ретранслировать их Пете. Компьютер Васи может начать ретрансляцию данных не раньше, чем им будут получены первые 512 Кбайт этих данных. Каков минимально возможный промежуток времени (в секундах) с момента начала скачивания Васей данных до полного их получения Петей? В ответе запишите только целое число, единицу измерения писать не нужно.
2) Документ объёмом 16 Мбайт можно передать с одного компьютера на другой
двумя
А. Сжать архиватором, передать по каналу связи, распаковать.
Б. Передать по каналу связи без использования архиватора.
Какой быстрее и на сколько, если:
* средняя скорость передачи данных по каналу связи составляет 2^21 бит в секунду;
* объём сжатого архиватором документа равен 25% от исходного;
* время, требуемое на сжатие документа, — 8 секунд, на распаковку — 3 секунды?
Виды информационных процессов
Среди всех информационных процессов можно выделить наиболее общие.
К ним относятся:
- получение,
- передача,
- хранение
- обработка информации.
Эти процессы являются базовыми.
Их выполнение порождает другие информационные процессы.
Так, например,
- получение информации может быть связано с её поиском, хранение — с накоплением;
- при передаче информации необходимо позаботиться о её защите от разрущающих воздействий.
Все процессы требуют той или иной формы представления информации, определяет которую процесс — кодирование. Он сопровождает все остальные процессы и является связующим звеном между ними.
Информационные процессы не изолированы, а протекают циклично в единстве и взаимосвязи друг с другом.
var
t:boolean;
d:integer;
begin
t := true;
d := 2;
while t and (d*d <= x) do
begin
if x mod d = 0 then
t := false;
d := d + 1
end;
prime := t
end;
function order(x:integer):boolean;
var
t:boolean;
d:integer;
begin
d := -1;
repeat
t := x mod 10 > d;
d := x mod 10;
x := x div 10
until not t or (x = 0);
order := t
end;
var
t:boolean;
i,k,n:integer;
begin
t := false;
read(k,n);
for i := k to n do
if prime(i) then
if order(i) then
begin
write(i,' ');
t := true
end;
if not t then
write(0)
end.