[spect]

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

var retret: PChar=#13#10#13#10;   dwrd: Cardinal; begin   asm mov eax, retret; mov eax, [eax];   mov dwrd, eax; end;   writeln(DWORD(retret^)); // выводится 13   writeln(dwrd); // выводится как и должно быть readln; end.

Как сделать тоже самое что и с асм вставкой?