Версия для печати темы

Автор: Shorty 31.05.2007 22:52

Получила задание реализовать класс: строка символов, нужно реализовать сравнение строк, удаление из строки указаного символа и переворот строки! Почти все сделала, осталось только сделать переворот строки! Я только начинаю учиться программировать, так что в этом я еще дуб, помогите плиз осуществить переворот строки!

Автор: volvo 31.05.2007 23:05

С обычной строкой это делается так:

var ch: char;
...
  for i := 1 to length(s) div 2 do begin
    ch := s[i]; s[i] := s[length(s) - i + 1]; s[length(s) - i + 1] := ch;
  end;