Составить программу на питоне 2.11. Дано слово. Переставить первый три и последние три буквы, сохранив порядок их следования.

# получаем строку

word__str = input()

# получаем длину строки

word_len__int = len(word__str)

# выбираем нужные символы

select__dict = {'first__str': word__str[word_len__int - 3:word_len__int],

               'second__str': word__str[:3]}

# выводим

print(select__dict['first__str'] + select__dict['second__str'])

var s,s1: string; n,i: integer; begin readln(s); readln(n); for i: =1 to n do begin insert(s[1],s1,length(s1)+1); delete(s,1,1); end; s: =s+s1; writeln(s); end.

решение для pascal abc

uses graphabc;

vara: integer; beginreadln(a); moveto(a,1); circle(a+a div 2,1,a div 4); lineto(a+a div 4,1); moveto(a+ (a div 4)*3,1); lineto (2*a,1); lineto(2*a,1+a); lineto (a,1+a); lineto (a,1); moveto (a,1+a); lineto (a-(a div 2),1+2*a); lineto(2*a+a div 2, 1+2*a); lineto(2*a,1+a); end.