Ai giúp em tìm ra công thức chung của tổng này với ạ đang cần gấp :'(( 1.2^0 + 2.2^1 + 3.2^2 + . . . + n.2^(n-1)

Công thức chung: Với một số i thì tổng sẽ tăng lên: i x $2^{i-1}$ 

Chương trình: 

uses crt;
var i,n,s:longint;
function lt(a,b:longint):longint;
var i:longint;
begin
   lt:=1;
   for i:=1 to b do lt:=lt*a;
end;
begin
clrscr;
   write(‘Nhap n: ‘);readln(n);
   for i:=1 to n do s:=s+i*lt(2,i-1);
   writeln(‘Tong= ‘,s);
readln
end.