DEKLARATION[X;GANZ]
BEGINN
 X:=3