Не понятное присвоение типа Опции

[TS*]

type 
 byte_array = array[0..9] of byte;
var
 b:byte_array;
begin
 readln(x);
 b:=byte_array(x);        { <-- что это за операция?}
.....
.....
.....

Как действует выше описаная операция?

[hardcase]

Это операция приведение типа - мы говорим компилеру трактовать значение переменной x как значение, приндлежащее типу byte_array

[APAL]

Не указано для какого компилятора этот код...

В TP7 такое не прокатит, и я думаю что это опечатка "(x)" - "[x]" плюс описать "x" как byte.

[TS*]

а почему <x> может быть только extended ?

[TS*]

Не указано для какого компилятора этот код...

В TP7 такое не прокатит, и я думаю что это опечатка "(x)" - "[x]" плюс описать "x" как byte.

я тоже так думал. Но оно в ТР7 компилирует, если нужно выложу всю прогу

[volvo]

TS*, а кто тебе сказал, что ТОЛЬКО Extended? X может быть любого типа, размер которого равняется размеру byte_array (то есть 10 байт)... Можешь попробовать:

Var
  Rec: Record
    X: LongInt; { 4 байта }
    Y: LongInt; { 4 байта }
    Z: Word; {2 байта }
  End;
  B: byte_array; 
...
  B := byte_array(Rec);

APAL, такое делается в TP на ура...

[hardcase]

не только 10 байт. Можно и больше.
но x- это скорее всего extended потому как
ReadLn(X) - какой ещё встроенный тип данных имеет размер >= 10 байтов?

[volvo]

не только 10 байт. Можно и больше.

Это ты компилятору TP расскажешь, ОК? Он тебе быстро Invalid Type Cast выдаст...

[TS*]

Спасибо вам, теперь смысл мне понятен!