1 + 1=2
2 + 2=4
4 + 4=8
8 + 8=16
16 + 16=32
32 + 32=64

64 + 64=128

CodePudding user response:

Very simple:

 
Dim I As an Integer, J As an Integer, B As Integer 
B=1 
For I=1 To 10 
J=B 
Print J & amp; "+" & amp; J & amp; "=" & amp; J + J 
B=J + J 
Next I 

CodePudding user response:

 
Dim As Integer I 
For I=1 To 10 
The Debug. Print 2 ^ (I - 1) & amp; "+" & amp; 2 ^ (I - 1) & amp; "=" & amp; 2 ^ I 
Next I