Разделить двоичные числа 100001: 11 = ? как делить я не понмаю,

var

x: real;

begin

readln(x);

writeln(round(x));

end.

64000 бит/с*16 c=1024000 бита/8=128000 байт=125 килобайт

графический файл состоит из 10000 точек.. используется всего два цвета, то есть на кодировку 1 цвета уходит 1 бит информации.. => 10000 бит

необходимо (но не достаточно).