Ф-я Length(s) Опции

[klem4]

Как вы можете объяснить результат этой рпограммы ? Строка изменяется, а длина остается прежней.

uses crt;
var
   s : string;
   T : char;
   i : byte;

begin
   clrscr;
   s := 'TEST';
   for i := length(s) + 1 to 20 do s[i] := 'r';
   writeln('s[6] = ', s[6]);
   writeln('length(s) = ',length(s));
   readln;
end.

Сообщение отредактировано: klem4 - 4.03.2006 11:00

[Altair]

Строка изменяется, а длина остается прежней.

Вспомним молодость.... мой первый пост на форуме, на этом.. любимом (еще бы...) форуме!
неправильная работа со строками в TP7

ну разве мог я тогда подумать, зайдя на вот этот форум...
что будет все, что сейчас есть у меня... ?!?!

Не хватает только нашего AlaRic'a, ...

ну простите меня, модераторы за сентиментальность