Question

free pascal如何将字符串分开？

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励20（财富值+成长值）

Answer 1

一个字符串逐位复制到另一个中比如
var s1,s2:string;
a:longint;
begin
s2:='';
s1:='fdjaskehaeu'
for a:=1 to 4 do s2:=s2+s1[a];
delete(s1,1,4);
writeln(s1);
writeln(s2);
readln;
end.

追问

为什么for a:=1 to 4
你可以确定长度吗？
还有delete的用法，谢谢

追答

你可以自己选择截取的长度
pacal语言北京理工大学出版社里面有详细的适合初学者

Answer 2

依据什么来分开呢？是定长？用空格？用逗号？

追问

根据字母

追答

把题目本身完整地贴上来看。