// PascalABC.NET 3.0, сборка 1139 от 10.01.2016 begin var n:=ReadInteger('Количество элементов в массиве: '); var a:=ArrRandom(n,-50,50); a.Println(','); Writeln('Четные элементы: '); var i:=1; while i<n do begin Write(a[i],' '); Inc(i,2) end; Writeln; Writeln('Нечетные элементы: '); i:=0; while i<n-1 do begin Write(a[i],' '); Inc(i,2) end; Writeln end.
Тестовое решение: Количество элементов в массиве: 10 15,-18,-29,-25,46,21,-8,-17,-9,15 Четные элементы: -18 -25 21 -17 15 Нечетные элементы: 15 -29 46 -8 -9
2. рисунок имеет размеры 1920*1080 пиксель, нарисован с палитрой 16 777 216. определите размер файла. 16 777 216 = 2^24 то есть 24 бит. 24 / 8бит = 3 байта на одну точку. 1920*1080*3 = 6220800 байт = 6075 кб
3.для хранения растрового изображения размером 1024*512 пиксель отвели 256 кба памяти. каково максимально возможное число цветов в палитре изображения?
256 кб = 262144 байт
262144 / 1024*512 = 0,5 байта = 4 бита в четырех битах можно уложить 2^4 = 16 цветов.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку