![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | 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: пользуемся тегами! |