GeoSeriesCalc.mem

00100000000000010000000000000011 // 001000_00000_00001_0000000000000011 // n = 3
00100000000000100000000000000010 // 001000_00000_00010_0000000000000010 // d = 2
00100000000000110000000000000001 // 001000_00000_00011_0000000000000001 // sum = 1
00100000000001000000000000000000 // 001000_00000_00100_0000000000000000 // i = 0
00100000000001010000000000000001 // seq = 1
00010000100000010000000000000100 // BEQ i != n
00000000010001010010100000011000 // 000000_00010_00101_00101_00000_011000 // seq *= d
00000000101000110001100000100000 // 000000_00101_00011_00011_00000_100000 // sum += seq
00100000100001000000000000000001 // 001000_00100_00100_0000000000000001 // i++
00001000000000000000000000000101 // 000010_00000000000000000000000101 // jump to BEQ
11111100011000000000000000000000 // 111111000110000000000000000000000 // print sum