Объем1=кол-во пикселе* глубину цвета палитра N=, где i-глубина цвета, в первом случае она равна 11, во втором при 128 цветах =7 бит на пиксель.Поэтому ответ 11/7 раз уменьшился объем файла
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018 Внимание! Если программа не работает, обновите версию!
begin var n:=ReadInteger('n='); WriteAllText('MyFile.txt',SeqRandom(n,-99,99).JoinIntoString); var (mn,mx):=(MaxInt,-MaxInt); foreach var line in ReadLines('MyFile.txt') do begin var a:=line.ToIntegers; (mn,mx):=(Min(a.Min,mn),Max(a.Max,mx)) end; Writeln('Cумма min+max = ',mn,'+',mx,' = ',mn+mx); ReadAllText('MyFile.txt').Println // контрольный вывод файла end.
Все просто. У вас есть какая-то статья. Чтобы посчитать ее размер, нужно знать, сколько всего символов в книге, т.к. на каждый символ по условию уходит 8 бит. При этом количество символов в каждой строке одинаково, что также можно сказать и о количестве строк на странице. Поэтому мы можем посчитать количество символов на одной странице => это будет 64 * 40 символов. По условию задачи в этой статье всего 48 таких страниц => всего в статье будет 64 * 40 * 48 символов. Так как кодировка КОИ-8 8-битовая, это означает, что каждый бит будет нам "стоить" 8 бит => размер статьи будет 64 * 40 * 48 * 8 бит. Но это число слишком большое, поэтому мы можем выразить его через Кбайты. 64 * 40 * 48 * 8 бит = (64 * 40 * 48 * 8)/(1024 * 8) Кбайт = 120 Кбайт. ответ: 120 Кбайт.
палитра N=