Дано слово. можно только менять местами соседние буквы. нужно получить из данного слова палиндром, используя минимальное число обменов.пример: из слова abbyy палиндром можно получить за четыре перестановки: abbyy babyy bayby byaby ybabyвывод: 4нужен код на pascal

1. переведите в байты: 560 бит = 560: 8  = 70 байтов 3024 бита =  3024: 8  =378  байтов 2. переведите в биты: 540 байтов = 540*8  = 4320  бит 2,5 кб = 2,5*1024*8= 2560*8 =  20480 бит 2 гб = 2*1024*1024*1024*8 = 171798184  бита 3. переведите в килобайты: 1024000 бит = (1024000: 8): 1024 = 125 кб 9240 байтов = 9240: 1024 ≈ 9,02  кб 4. заполните пропуски числами: а) 3, 5 кбайт = 3584 байт = 28672  бит б) 3, 5 гбайт = 3584  мбайт = 3670016 кбайт 1  ответ: 312 бит 2 ответ: 7,3 кбайт 3 ответ: 547 4 ответ: 32768

Uses crt; var s1,s2: string;     x,y: integer; function pos(s1,s2: string): integer;           begin           for x: =length(s1) downto 1   do               for y: =length(s2)downto 1 do               if (s1[x]=s2[y])   then pos: =x;           end; begin       write('s1: '); readln(s1);       write('s2: '); readln(s2);       writeln(pos(s1,s2)); end.