Адрес переменной

[_-Re@l-_]

Прочитал в книге вот такое:

@ - получение адреса

А как с помощью @ получить адрес переменной?
Пробовал так:

Var
     A:Integer;
     P:Pointer;
Begin
        P:=@A;
        Writeln(^P);
        Readln;
End.

Однако на экран выводится странный треугольничек, скрин прилагаю.
http://s1.ipicture.ru/uploads/20101230/p72WFhRr.jpg

[p51x]

Во-первых,

 Writeln(P^);

А, во-вторых, вы переменную не инициализировали... что вы хотели увидеть?

[_-Re@l-_]

Во-первых,

1. Ага, захотел. Я так делал, так он пишет Cannot Read or Write variable of this type. Так что ха.

А, во-вторых, вы переменную не инициализировали... что вы хотели увидеть?

2. А вот это по делу.


P.S. Переменную инициализировал, но результат тот же.

[Serge_Bliznykov]

а так?

Var
  A:Integer;
  P:Pointer;
Begin
  A := 1234;
  P:=@A;
  Writeln(Integer(P^));
  Readln;
End.

[Stilet]

О Майн Гот... Неужели книг не читаем?

Var
     A:Integer;
     P:^Integer;
Begin
        P:=@A;
        Writeln(P^);
        Readln;
End.

_-Re@l-_

Читай матчасть про указатели в паскале, про типированые и нетипированные

[_-Re@l-_]

Serge_Bliznykov, Stilet, вы меня не поняли. В ваших программах просто pointer'у присваивается значение переменной.
А мне нужно получить адрес, по которому располагается переменная. Вот аналог на С++:

#include <iostream>
#include <stdio>
#include <stdlib>
#include <conio.h>

int main()
{
  int x;
  cout.setf(ios::hex);
  cout.unsetf(ios::dec);
  cout<<"Адрес  = "<<&x<<endl;
  getch();
  return 0;
}

[Stilet]

Эх... Ну почему меня никто не слушает?...
Если бы почитал про указатели то понял бы что их можно приводить к типу целого:

Writeln(integer(P));

P - Указатель
Р^ - Значение по его адресу.
Еще раз повторюсь - матчасть! Особенно в старых советских книгах.

[_-Re@l-_]

Всё равно таким образом адрес переменной не получить, только значение! Ну как же вы не понимаете.
В этом случае

#include <iostream>
#include <stdio>
#include <stdlib>
#include <conio.h>

int main()
{
  int x;
  cout.setf(ios::hex);
  cout.unsetf(ios::dec);
  cout<<"Адрес  = "<<&x<<endl;
  getch();
  return 0;
}

Результатом будет шестнадцатеричное число-адрес местонахождения переменной, типа 0x4567df8 - что нибудь такое. А в ваших примерах просто значение переменной.

[russian-stalker]

Адрес переменной имеет размер в 4 байта(Integer). Pointer - нетипизированный указатель. Если мы напишем Writeln(P), то откуда программа узнает какого размера указатель? Ведь writeln не перегружена для вывода указателя. Поэтому нам нужно привести указатель к какому-то типу. В нашем случае логичнее всего привести к Integer. То есть, как сказал Stilet, Writeln(Integer(p));

[_-Re@l-_]

Так, ладно, понял. Сделал.
А вот можно ли вывести его в шестнадцатеричном виде?