import std.string,
       std.stdio,
       std.conv;

void main(){
	while(true){
	string s = readln.chomp;
	if (s == "-") break;

	int n = readln.chomp.to!int;
	ulong sx=0;
	foreach(i;0..n){
		sx+=readln.chomp.to!int;
	}

	sx = sx % s.length;
	writeln(s[sx..$] ~ s[0..sx]);
	}
}