algoritm:

s:=0;
for i:=2 to n-1 do s:=s+(k-1)^(i-1)*k^(n-i-1);
write(s);

I think it isn't right algoritm (К тому же so long)

what is the meaning of ^ ??????