var a: Int, b: ^Int;
begin
  a := 5;
  b := @a;
  writei(b^)
end.