А вот и задачка :-))

← →
Romkin © (2003-03-12 16:36) [0]

var p: PInteger; a, diff: Integer; begin p := @a; inc(p,3); diff := integer(p) - integer(@a); end;
Без компиляции - какое число в diff?

← →
Romkin © (2003-03-12 16:39) [1]

Интересно, как скоро ее удалят...
На самом деле, это просто предостережение об аккуратной работе с указателями. Я с ними очень давно не работал, вот и напоролся...

← →
vuk © (2003-03-12 16:41) [2]

А чем она не понравилось, что её удаляют? Не догоняю что-то...

← →
Anatoly Podgoretsky © (2003-03-12 16:41) [3]

12 ?

← →
uw © (2003-03-12 16:43) [4]

4 или -4

← →
uw © (2003-03-12 16:44) [5]

Тьфу...

← →
Romkin © (2003-03-12 16:44) [6]

А фиг его знает :-))
Кстати, это было навеяно вопросом по С:
printf("%d\n", (int *)2 + 3);
что выдаст? ;-)

← →
Delirium^.Tremens © (2003-03-12 16:45) [7]

> vuk © (12.03.03 16:41)
> А чем она не понравилось, что её удаляют? Не догоняю что-то...

Это документ ДСП в Borland и удаляется из соображений секретности
:-)

← →
Юрий Зотов © (2003-03-12 16:50) [8]

3 * SizeOf(Pointer).
12.

← →
Digitman © (2003-03-12 16:50) [9]

конечно - 12 ! а что же еще ?)

← →
Romkin © (2003-03-12 16:51) [10]

2Юрий Зотов SizeOf(Integer) ;-))

Естественно, ведь типизированный указатель.
Хотя так писать не стоит.

> Юрий Зотов © (12.03.03 16:50)

Если мне не изменяет память, то 3 * SizeOf(того типа, с которым єтот поинтер ассоциирован). То есть, в данном случае 12...
Но в общем может быть и не так. Для нетипизированных указателей такая операция недопустимая... Синтаксис..

Из Help:

procedure Inc(var X [ ; N: Longint ] );

...

Note: If X is a pointer type, it increments X by N times the size of the type pointed to.

Дык эта ну 12 вроде и будет... а в чем прикол?

Прикол в том, что я ожидал 3 :-))

А вот и задачка :-)) Найти похожие ветки