А теперь посчитаем за сколько времени передастся файл без сжатия: 503316480/222=2267191,35 секунд
Отлично, теперь получим размер сжатого файла: 503316480*0,7=352321536 бит
А передастся файл за: 352321536/222=1587033,95 секунд
Но мы не учли скорость архивации и разархивирования: 1587033,95 + 15 + 7 = 1587055,95 секунд
Ну и видно, что файл даже с временем на сжатие будет передан быстрее.
Zolotnik974620
03.04.2023
//Pascal var a,b, I, maxsumm, max : integer;
function summdel(x:integer):integer; //результат - сумма делителей х var k,sum:integer; begin sum:=0; for k := 1 to x div 2 + 1 do if x mod k = 0 then sum:= sum+k; summdel:=sum; end;
begin writeln('Введите границы a,b '); readln(a,b); maxsumm := 1; max := 1; for i := a to b do begin if summdel(i) > maxsumm then begin maxsumm:= summdel(i); max := i; end; end; writeLn('Максимальная сумма делителей - ', maxsumm, ' число - ',max) end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
для меня ето очень важно Вкажіть які бувають миші за обміну даними:А)дротовіВ)бездродовіС)механічніD)оптичні
А) і В)
Объяснение: