Суммативное оценивание за раздел «Измерение информации. Компьютерная память». Ф.И. Класс 1. Ученик готовил к 1 сентября оформление класса. Он нарисовал листочки на окна, данные изображения хранятся в оперативной памяти. Изображение каждого листочка требует 15 Кб памяти. Размер каждой ячейки ОЗУ равен15 Кб. Определите, какой объем оперативной памяти устройства остался свободным? Кб=байт=бит [3] 2. Вы сделали реферат весом 5Кб в текстовом документе в формате .doc, Вам нужно его распечатать в магазине. А) Какое учтройство вы для этого можете использовать? Б) Объясните свой выбор [2] 3. Вам нужно записать видео на диск объемом 700 Мб. Это видео в формате .avi занимает 710000 байт, а в формате .dvd – 720000 байт. Определите и объясните, в каком формате вы сможете записать видеоролик на диск и почему. [2] 4. Назовите и опишите два позволяющих уменьшить размер документа. [4] Наименование 1 Описание Наименование 2 Описание

Эту колдунью зовут Кодировка КОИ-8. Таблица кодирования: А-Ю, Б-А, В-Б, Г-Ц, Д-Д, Е-Е, Ж-Ф, З-Г, И-Х, Й-И, К-Й, Л-К, М-Л, Н-М, О-Н, П-О, Р-П, С-Я, Т-Р, У-С, Ф-Т, Х-У, Ц-Ж, Ч-В, Ш-Ь, Щ-Ы, Ъ-З, Ы-Ш, Ь-Э, Э-Щ, Ю-Ч, Я-Ъ, Ё-╦ Таблица построена так. Слева стоят буквы по русскому алфавиту, а справа русские буквы, соответствующие английскому алфавиту. @ - Ю (код 40), A - А (41), B - Б, C - Ц, D - Д, E - E, F - Ф, и т.д. Буква Ё - 33-ья в алфавите, она выбивается из ряда в 32 буквы, поэтому превращается не в букву, а в элемент псевдографики. И еще меняется регистр, 1-ая буква маленькая, остальные большие.

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

begin
  var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
  var se:=a.Where((x,i)->i.IsOdd).Sum;
  var pn:=a.Where(x->x<0).Aggregate(BigInteger(1),(p,q)->p*q);
  var ko:=a.Where(x->x.IsOdd).Count;
  Writeln('Сумма элементов с четными номерами: ',se);
  Writeln('Произведение отрицательных элементов: ',pn);
  Writeln('Количество нечетных элементов: ',ko)
end.

Пример
n= 17
7 -60 -7 -96 -14 97 7 -68 -89 -87 -50 49 77 -52 -36 -15 99
Сумма элементов с четными номерами: -232
Произведение отрицательных элементов: -417286023598080000
Количество нечетных элементов: 10

begin
  var a:=ReadArrInteger('Вводите:',ReadInteger('n='));
  a.Println;
  a.Transform(x->x<0?abs(x):x>0?x*x:x); a.Println
end.

Пример
n= 17
Вводите: 7 -60 -7 -96 -14 97 7 -68 -89 -87 -50 49 77 -52 -36 -15 99
7 -60 -7 -96 -14 97 7 -68 -89 -87 -50 49 77 -52 -36 -15 99
49 60 7 96 14 9409 49 68 89 87 50 2401 5929 52 36 15 9801

begin
  var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
  var im:=a.IndexMax;
  swap(a[0],a[im]); a.Println;
end.

Пример
n= 16
-73 -46 76 92 -57 -57 81 -96 -92 18 -76 89 13 -83 69 56
92 -46 76 -73 -57 -57 81 -96 -92 18 -76 89 13 -83 69 56