var len:longint;//len记录字符串的长度 s:ansistring;//超长字符串sbegin readln(s);//读入s len:=length(s);//length(s)为计算字符串长度的函数（包括string、ansistring) writeln(len);//输出长度end.
