Утани есть доступ к интернет по высокоскоростному одностороннему радиоканалу, обеспечивающему скорость получения информации 218 бит в секунду. у сергея нет скоростного доступа в интернет, но есть возможность получать информацию от тани по телефонному каналу со средней скоростью 212 бит в секунду. сергей договорился с таней, что та будет скачивать для него данные объёмом 5 мбайт по высокоскоростному каналу и ретранслировать их сергею по низкоскоростному каналу. компьютер тани может начать ретрансляцию данных, не раньше чем им будут получены первые 512 кбайт этих данных. каков минимально возможный промежуток времени (в секундах) с момента начала скачивания таней данных до полного их получения сергеем? в ответе укажите только число, слово «секунд» или букву «с» добавлять не нужно.

8-9 секунд примерно,щитает лень,но примерно сказал

T=t(0) +T

t(0)=(512*8*1024)/218=19239.9 сек
T=(5*1048576*8)/212=197844.528 сек
t=217084 сек

Program Begenjov1997;

const

 n = 30; {Количество элементов массива}

 m = 10000; {Максимально возможное значение элемента}

var

 a:array[1..n] of integer;

 i, sum: integer;

 s:string;

begin

 s:=' -=Alphaeus=- ';

 for i:=1 to 22 do begin write(s[i]); sleep(60) end;

{заполняем массив случайными числами}

 writeln; randomize;

 for i:=1 to n do a[i]:=random(m+1);

{Ищем максимальный и минимальный элементы}

 sum:=0;

 for i:=1 to n do

   if (a[i]<200) and (a[i] mod 5 = 0) then sum:=sum+a[i];

{Заменяем эти элементы найденной суммой}

 for i:=1 to n do

   if (a[i]<200) and (a[i] mod 5 = 0) then a[i]:=sum;

{Вывод}

 writeln;

 for i:=1 to n do writeln(a[i]);

end.

Program Begenjov1997;

const

 n = 30; {Количество элементов массива}

 m = 10000; {Максимально возможное значение элемента}

var

 a:array[1..n] of integer;

 i, min, max: integer;

 s:string;

begin

 s:=' -=Alphaeus=- ';

 for i:=1 to 22 do begin write(s[i]); sleep(60) end;

{заполняем массив случайными числами}

 writeln; randomize;

 for i:=1 to n do a[i]:=random(m+1);

{Ищем максимальный и минимальный элементы}

 min:=a[1]; max:=a[1];

 for i:=1 to n do

   begin

     if (a[i]>max) then max:=a[i];

     if (a[i]<min) then min:=a[i];

   end;

{Заменяем минимальные элементы на максимальные}

 for i:=1 to n do

   if (a[i] = min) then a[i]:=max;

{Вывод}

 writeln('Массив:');

 for i:=1 to n do writeln(a[i]);

end.