Mail

В этот день много лет назад...
25 апреля. В 1964 году (60 лет назад) - В Белоруссии корова отелиляется семью телятами (мировой рекорд).

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.