![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
![]() Разработать программу, которая представляет исходную строку в обратном порядке и при этом удаляет в строке результата указанную группу символов.
Могу просто сделать чтобы строка читалась задом наперёд, но вот исключить группу символов не могу ![]() Код:
..... var S: string; C: char; BEGIN S:=Edit1.Text; N:=length(S); for i:= 1 to N div 2 do begin C:= S[i]; S[i]:= S[N-i+1]; S[N-i+1]:= C; Label4.Caption:=S; end; END. lmikle: пользуемся тегами! |