Дано слово из букв. Поменять местами его трети следующим образом а) первую треть слова разместить на месте третьей, вторую треть на месте первой, третью треть на месте второй б) первую треть слова разместить на месте второй, вторую треть на месте третьей, третью треть на месте первой.

"TempStr" можно убрать

{ Ответ дан на языке Pascal }{         Вариант a         }PROGRAM Solution(INPUT, OUTPUT);VAR  Str: STRING;  Str1: STRING;  Str2: STRING;  Str3: STRING;  TempStr: STRING;BEGIN  WRITE('Введите строку: ');  READLN(Str);  Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);  Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));  Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));  WRITELN(Str2 + Str3 + Str1);END.{         Вариант b         }PROGRAM Solution(INPUT, OUTPUT);VAR  Str: STRING;  Str1: STRING;  Str2: STRING;  Str3: STRING;  TempStr: STRING;BEGIN  WRITE('Введите строку: ');  READLN(Str);  Str1 := COPY(Str, 1, LENGTH(STR) DIV 3);  Str2 := COPY(Str, LENGTH(STR) DIV 3 + 1, (LENGTH(STR) DIV 3));  Str3 := COPY(Str, (LENGTH(STR) DIV 3) * 2 + 1, LENGTH(STR));  WRITELN(Str3 + Str1 + Str2);END.