Дано слово из 12 букв

Question

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

Answer 1

37

chivpoint

22 февраля 2023

Program buldog78; var s,s1,s2,s3: string; i,h: integer; beginwrite ('S='); read (s); h: =length (s) div 3; for i: =1 to h dos1: =s1+s[i]; for i: =h+1 to h*2 dos2: =s2+s[i]; for i: =h*2+1 to h*3 dos3: =s3+s[i]; writeln ('S=',s2,s3,s1); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: