Типы

← →
aev (2002-07-26 09:49) [0]

Уважаемые программисты!
Помогите разобраться с такой проблеммой:
В некотором файле
var f : file of byte;
записано значение переменной типа Real (как в Паскале - 6 байт).
Подскажите, как, считав эти 6 байт, восстановить значение переменной типа Real. Заранее благодарен.

← →
Opuhshii (2002-07-26 10:09) [1]

real48

← →
aev (2002-07-26 10:21) [2]

Точнее - как из последовательности 6-ти байт получить значение переменной типа Real, которая хранится в файле.
если бы файл был
var f : file of real;
то можно было бы написать
var r : real; ... ... Read(f,r);

← →
MBo (2002-07-26 10:25) [3]

ba:array[1..6] of byte;
r:real48 absolute ba;

заполнить массив, считать r

или через указатели

preal48=^real48;
r:real48;

r:=preal48(@ba[1])^;

← →
IlyaA (2002-07-26 10:35) [4]

TValue = Record case integer of 1: a: array [1..6] of byte; 2: b: real; end;

Я не уверен до конца, но где-то так. Массив a и переменная b начинаются по одному адресу. Пиши что хочешь

Типы Найти похожие ветки