Форум: "Начинающим";
Текущий архив: 2009.09.20;
Скачать: [xml.tar.bz2];
ВнизКак сохранить число в трех однобайтовых. Найти похожие ветки
← →
Cobalt © (2009-07-16 11:12) [0]К вопросу о математике и представлении одного числа в трех :-)
Procedure SaveOneToThree(Incoming: SomeThreeByteType; var First, Second, Third: OneByteType);
begin
First := Incoming mod 256;
Incoming := Incoming div 256;
Second := Incoming mod 256;
Third := Incoming div 256;
end;
Function ConcatThreeToOne(First, Second, Third: OneByteType): SomeThreeByteType;
begin
Result := First + Second*256 + Third*256*256;
end
← →
Palladin © (2009-07-16 11:13) [1]Это вопрос или что это?
← →
brother © (2009-07-16 11:14) [2]и где вопрос? а вообще, эту тему уже замучали.
← →
brother © (2009-07-16 11:14) [3][1] опередил)))))
← →
@!!ex © (2009-07-16 11:15) [4]> [0] Cobalt © (16.07.09 11:12)
В той ветке уже был ответ.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2009.09.20;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.003 c