Mail

В этот день много лет назад...
16 марта. В 1761 году (265 лет назад) - В Ложу Трех Глобусов из Кенигсберга представлен список масонской ложи. За N 6 в ней значился Александр Суворов.

Turbo Pascal Documentation

Функция Length

     Функция: Возвращает динамическую длину строки.
     Описание: Length(s : string)
     Тип результата: Целый (integer).
     Примечания: Параметр  s  представляет  собой  выражение
строкового типа. Результатом будет длина s.
     Пример:

  var
    s : string;
    i : word;
  begin
    s := 'abc';
    for i := 1 to Lenth(s) do
      s[i] := UpCese(s[i]);
      Writeln(s);                       { ABC }
  end.