Неясности в формате файла

← →
Anatoly Podgoretsky © (2010-07-26 15:56) [440]

Правильно, это я с плюсом спутал, будь он неладен.

← →
Виталий © (2010-07-26 16:01) [441]

> это серьезная ошибка заменять ОR плючом

Это я понял, я говорю конкретно про степени двойки. Умножение на 2 сдвигает старший бит, в результате чего на одном месте у разных степеней двойки не будет единиц.

> Будет 7 а на 9

Не понял, вы про что?

← →
Alien1769 © (2010-07-26 16:14) [442]

Автору,
попробуй словами описать алгоритм !

const
n = 5;
var
mask,i: byte;
begin
writeln("=====");
for mask:=0 to (1 shl n)-1 do
begin
for i:=0 to n-1 do
write(ord(mask and (1 shl i)<>0));
writeln;
end;
readln;
end.

← →
Виталий © (2010-07-26 16:31) [443]

32 раза (от 0 до 31) выведет последовательность из 5 элементов - кодов 1, если бит в i-той позиции текущей переменной внешнего цикла установлен, и нуля в противном случае, а затем перевода на новую строку.

Неплохо :)
Теперь я думаю тебе можно начинать делать редактор фонтов. Для начала научись выводить любой код ASCII в виде единиц и нулей. Потом собирать из представленных битов последовательность байтов и записывать на диск.

> Виталий © (26.07.10 16:31) [443]

Наверно, теперь ты сможешь объяснить, почему код,
приведенный han_malign (12.07.10 18:03) [22]
в ветке http://delphimaster.net/view/2-1278658000/ , выполняет побайтовое сложение переменных по модулю 256:
a, b, c: cardinal; c:= ((a xor b) and $80808080) xor ((a and $7F7F7F7F) + (b and $7F7F7F7F));

А если напишешь без циклов алгоритм побайтовго сложения с насыщением до 255,
то можешь считать, что материал усвоен на 5.

Конечно, доказательство тождеств никто не отменял :)

Неясности в формате файла Найти похожие ветки