Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Теоретические вопросы _ Не понятное присвоение типа

Автор: TS* 22.04.2006 0:30

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


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

Автор: hardcase 22.04.2006 1:00

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

Автор: APAL 22.04.2006 1:25

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

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

Автор: TS* 22.04.2006 1:36

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

Автор: TS* 22.04.2006 1:46

Цитата(APAL @ 21.04.2006 20:25) *

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

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

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

Автор: volvo 22.04.2006 1:52

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 22.04.2006 1:56

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

Автор: volvo 22.04.2006 1:58

Цитата(hardcase @ 21.04.2006 21:56)
не только 10 байт. Можно и больше.

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

Автор: TS* 22.04.2006 2:00

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