1 Представьте десятичные числа в

беззнаковом 8- разрядном формате:

49

153

Var
  A: array[1..200] of byte;
  i, N, cTwo, cThree, cFour, cFive: byte;
begin
write('Введите количество учеников(N): '); readln(N);
randomize;
writeln('Все оценки за экзамен.');
for i := 1 to N do
begin
  A[i] := random(4)+2;
  if A[i] = 2 then cTwo := cTwo + 1;
  if A[i] = 3 then cThree := cThree + 1;
  if A[i] = 4 then cFour := cFour + 1;
  if A[i] = 5 then cFive := cFive + 1;
  write(A[i], ' ');  
end;
writeln('');
writeln('Оценку 2 получили ', cTwo, ' уч.');
writeln('Оценку 3 получили ', cThree, ' уч.');
writeln('Оценку 4 получили ', cFour, ' уч.');
writeln('Оценку 5 получили ', cFive, ' уч.');
writeln;
end.

1. изображение имеет размеры 1200*1024 пиксель, и нарисовано в два цвета: черный и белый. определите размер файла.

1200 * 1024 * 1 бит = 1228800 бит
1228800 бит /8 бит в байте / 1024 байт в килобайте = 150 килобайт

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 цветов.