Number1 = 6
Count = 0
Repeat
Number1 = Number1 + Count
Count = Count + 1
Until Count > 6