06.08.2007, 18:55
общий
это ответ
Здравствуйте, Алена!
в конце строки
For i:= Length (s) downto 1
не хватает оператора do
т.е. надо вот так:
For i:= Length (s) downto 1 do
кстати внимательней смотрите за сообщениями об ошибках - Дельфи Вам выдало ответ на Ваш вопрос сразу:
[Error] ... : ‘DO‘ expected but identifier ‘Result‘ found