Правила форума
Length.PASЯзык:
Русский
English
{ Пример программы для функции Length }
uses Crt;
var
S : String;
begin
ReadLn(S);
WriteLn('"', S, '"');
WriteLn('Длина = ', Length(S));
end.
var
S : String;
begin
ReadLn(S);
WriteLn('"', S, '"');
WriteLn('Длина = ', Length(S));
end.
::
::
::
