回 帖 发 新 帖 刷新版面

主题:怎样访问一个字符串里的每一个字符

那个大虾教一下访问一个字符串里的每一个字符的实现方法哦,最好是pascal的

回复列表 (共4个回复)

沙发

把它拆开读入数组

板凳

STRING类型直接就可以拆开(STRING+[n])
例:
VAR
S:STRING;
A:ARRAY[1..10] of CHAR;
I:INTEGER;
BEGIN
READ(S);
FOR I:=1 T0 10 DO
A[I]:=S[I];
FOR I:=1 TO 10 DO
WRITE(A[I]);
END.

3 楼

嗯无论用 array[] of char 或者是 string 都可以,注意是从 [1] 开始的

4 楼

谢谢,各位大虾指教!

我来回复

您尚未登录,请登录后再回复。点此登录或注册