já bych to řešil textově.

rozdělit podle počtu číslic na sudá a lichá. U lichých "vynechat" prostřední a v obráceném gardu sepsat číslice zleva doprava. V podstatě jeden if a pak už jen otročina.

obecně:

pocet = zjisti_počet znaků (string)
if pocet mod 2 = 0
   then vystup = substring (1, pocet div 2, string) #sebere prvni pulku (od prvniho znaku)
   else vystup = substring(1, pocet div 2 + 1, string)  #sebere prvni pulku a prostřední znak
endif 
for i in (pocet div 2) to 1 do 
     vystup = vystup + substring (i, 1, string)  #zpetne prida po znaku levou stranu
next