RosettaCodeData/Task/Address-of-a-variable/FutureBasic/address-of-a-variable.futurebasic

include "ConsoleWindow"

dim as short i : i = 575
dim as ptr j : j = NULL

j = @i

print "Adddress of i ="; j
print "Value of i ="; [j]