Документ объёмом 20 мбайт можно передать с одного компьютера на другой двумя а) сжать архиватором-1, - id278982120200116 от RomanBelyy01 16.01.2020 17:08

Question

Информатика: Документ объёмом 20 мбайт можно передать с одного компьютера на другой двумя а) сжать архиватором-1, передать архив по каналу связи, распаковать; б) сжать архиватором-2, передать архив по каналу связи, распаковать; какой быстрее и насколько, если средняя скорость передачи данных по каналу связи составляет 220 бит в секунду,объём документа, сжатого архиватором-1, равен 20% от исходного,на сжатие документа архиватором - 1 требуется 18 секунд, на распаковку - 2 секунды,объём документа, сжатого архиватором-2,

RomanBelyy01 · Accepted Answer

// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ArrRandom(ReadInteger('n='),2,5); a.Println;
var b:=a.GroupBy(t->t).Select(t->(t.Key,t.Count)).OrderBy(t->t[0])
.Select(t->t[1]).ToArray;
Writeln('Сдано на 5: ',b[3]);
Writeln('Сдано на 4: ',b[2]);
Writeln('Сдано на 3: ',b[1]);
Writeln('Не допущено: ',b[0])
end.

Пример
n= 20
4 4 3 5 4 5 2 4 4 4 5 4 3 3 4 2 3 2 2 2
Сдано на 5: 3
Сдано на 4: 8
Сдано на 3: 4
Не допущено: 5

Написать программу при поступлении в вуз абитуриенты, получившие “2” на первом экзамене, ко второму

Написать программу при поступлении в вуз абитуриенты, получившие “2” на первом экзамене, ко второму

MOGZ ответил