If I understood your question, then:
a=1;b=2^a;c=2^(a+1)*b;printc,", ",;a++;if(a<24, goto1, 0)
1, 2, 8 , 32 , 128 , 512 , 2048 , 8192 , 32768 , 131072 , 524288 , 2097152 , 8388608 , 33554432 , 134217728 , 536870912 , 2147483648 , 8589934592 , 3 4359738368 , 13 7438953472 , 54 9755813888 , 219 9023255552 , 8,796,093,022,208, which is the 23rd term = 2^43