Не явное обращение к переменным

[Igor_Efremenko]

Доброго времени суток!
Помогите, пожалуйста разобраться с такой ситуацией:

Предположим:
1) есть несколько переменных А1,А2,А3, содержащие некоторые значения;
2) Есть переменная того же типа, которой необходимо присвоить значение одной из этих переменных;
3) Есть строковая переменная В, которая содержит название переменной, от которой необходимо получить значение

Пробую делать так:

PROGRAM TestVar
VAR
A:WORD;
A1:WORD;
A2:WORD;
A3:WORD;
B:STRING(20);
pw:POINTER TO WORD;
END_VAR


---------- Сама программа ---------------

A:=0;

A1:=111;
A2:=222;
A3:=333;

B:='A1';

pw:=ADR( ПреобразоватьСодержимое(В) ); (* ТУТ ЯВНО ОШИБКА, но как написать правильно ??? *)

A:=pw^;

Как правильно реализовать?