Ответ:
есть пара неясностей в условии. если допускается такое, что единица и само число тоже являются делителями, то берите первый вариант решения, иначе - берите второе.
и еще кое-что: если нужно хотя бы 4 делителя, то оставьте все как есть, а если нужно ровно четыре делителя, в строчке if k> =4 then write(i: 3); уберите знак > .
1 вариант.
program zadacha;
var n, i, j, k : byte;
begin
write('введите число n');
for i: = 1 to n do begin
k: =0;
for j: = 1 to i do
if i mod j =0 then k: =k+1;
if k> =4 then write(i: 3);
2 вариант.
program zadacha;
var n, i, j, k : byte;
begin
write('введите число n');
for i: = 1 to n do begin
k: =0;
for j: = 2 to (i-1) do
if i mod j =0 then k: =k+1;
if k> =4 then write(i: 3);
Держи ответ. формулы для пепевода 8=4:2:1. 16=8:4:2:1
рх - это пиксели, именно в них измеряется разрешение экрана
392 пикселя - ширина экрана
240 пикселей - высота экрана
I = K * i (I - объем информации, K - кол-во пикселей, i - вес одного пикселя / глубина цвета)
K = 10 * 10 = 100 пикселей
По формуле 
или 
(N - кол-во цветов в палитре, i - глубина цвета)
Глубина цвета 
бит
I = K * i = 100 * 4 = 400 бит
400.0 бит = 50.0 байт = 0.048828125 Кбайт = 4.76837158203125e-05 Мбайт = 4.6566128730773926e-08 Гбайт = 4.547473508864641e-11 Tбайт
Ответ: 400
