Запомнить меня на этом копьютере
Пример программы для функции StrEnd.
{StrEnd.PAS} { Пример программы для функции StrEnd } Uses Strings, WinCrt; Var S : Array [0..79] Of Char; Begin ReadLn(S); WriteLn('Длина строки = ', StrEnd(S) - S); End.
Скачать strend.pas