for b=0:(c=length(a=fgetl(0)))disp([a(c-b:c),a(c:-1:c-b)]);end