input "How many values do you want? :";n
dim Q(n)
Q(1)	= 1
Q(2)	= 1
for i = 1 to n
  if i >= 3 then Q(i) = ( Q(i - Q(i-1)) + Q(i - Q(i-2)) )
  if i <= 20 then print "n=";using("####",i);" ";using("###",Q(i))
next i
if i > 20 then print "n=";using("####",i);using("####",Q(i))
end