Const n = 10; var a : array [1..n] of integer; r : boolean; i,j : integer; begin //Формирование массива пропущено
r := true; While r do begin if a[i] mod 2 =0 then begin for j := n-1 downto i + 2 do a[j] := a[j-1]; a[i+1] := 0; r := false; end; i := i +1; end; for i := 1 to n do writeln (a[i]); end.
Во избежании ошибок стоит учесть наличие такового элемента в массиве и размерность массива (чтобы его можно было корректно расширить на один элемент)
Изначально смотрим что у нас не совпадают еденицы измерения, скорость передачи у нас в БИТАХ в секунду, а размер файла в КИЛОБАЙТАХ. Переводим Килобайты в байты (1 Килобайт=1024 байтам, 1 байт = 8 битов)Следовательно 2000 Килобайт * 1024 = 2048000 байт * 8= 16384000 бит. Скорость передачи данных = объем данных / на время затраченное для передаци этих данных. Следовательно чтобы найти время затраченое для передачи данных надо объем переданных данных (т.е. 2000 Кбайт, которые мы предварительно перевели в биты 16384000 бита) поделить на скорость передачи данных 1024000бит/с.16384000бит / 1024000 Кбит/с = 16 сек. Что собственно и является ответом.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку