информатика, не шарю

страниц, на каждой странице 28 строк, в каждой строке 64 символа, каждый символ
кодируется 16 битами. Определить информационный объем статьи.

Program name;
Const n=15;
var a: array [1..n] of integer;
i,p:integer;
begin
p:=1;
for i:= 1 to n do
begin
a[i]:=random(15);
write(a[i],' ');
end;
writeln;
for i:= 1 to n-1 do if a[i]+a[i+1]>10 then
begin
p:=0;
write(a[i],',',a[i+1],' ');
end;
if p=1 then writeln('NO');
end.

ИНФОРМАТИКУ НЕ ПОНИМАЮ,И ТЕМА НОВАЯ.
ВВЕСТИ С КЛАВИАТУРЫ МАССИВ ИЗ ДВАДЦАТИ ЦЕЛЫХ ЧИСЕЛ,ОБНУЛИТЬ ВСЕ ОТРИЦАТЕЛЬНЫЕ ЭЛЕМЕНТЫ,ВЫВЕСТИ МАССИВ НА ЭКРАН,ПОМЕНЯТЬ МЕСТАМИ ПЕРВЫЙ И ДВАДЦАТЫЙ ЭЛЕМЕНТ,ВЫВЕСТИ МОДИФИЦИРОВАННЫЙ МАССИВ.
ну пожалуйстаа:((((

1.Сообщение о том, что ваш друг живет на 10 этаже, несет 10 бит информации.Сколько этажей в доме?


2.для хранения растового изображения размером 16*512 пикселя отвели 2048 байт памяти.каково максимально возможное число цветов в палитре изображения?