Pascal ABC, Turbo Pascal 7, Free Pascal, функции Pascal, Паскаль
function Length(Строка: string): integer;
Скачать Pascal ABC
Скачать Turbo Pascal