Алг цел ЧислоСимволов(арг сим х, лит стр)

Кон

Следующий алгоритм "переворачивает" строку:

Алг Переворот(арг лит стр1, рез лит стр2)

. надо | стр2 содержит те же символы,

. | что и стр1, но в обратном порядке

Нач цел инд

. стр2:=""

Нц для инд от 1 до длин(стр1)

. . стр2:=стр1[инд]+стр2

Кц

Кон

Перевернуть строку можно и не используя другую строку, так сказать, "на старом месте":

Алг Переворот на месте(аргрез лит стр)

. надо | новое значение строки стр содержит те же символы,

. | что и исходное значение, но в обратном порядке

Нач цел лев, прав, длина, сим х

. длина:= длин(стр)

Нцдля лев от 1 до div(длина,2)

. . прав:=длина+1-лев | лев и прав равноотстоят от концов строки

. . х:=стр[лев]; стр[лев]:=стр[прав]; стр[прав]:=х

Кц                  

Кон

Мы поможем в написании ваших работ!