主题：小虾又问大家问题了，请多关照
pascaler
[专家分：150] 发布于 2006-02-16 18:18:00
S是STRING型 L是CHAR型
我想将S的第一个字符赋予L，怎么办？
下面是我写的，但有错误，又挑不出，请大家帮帮忙，谢谢！
var s:string;
l:char;
begin
s:='abcd';
l:=copy(s,1,1);
writeln(l);
end.
回复列表 （共8个回复）
沙发
lmj9201 [专家分：1400] 发布于 2006-02-16 18:52:00
这样不行，copy函数返回的是个子串，而不是字符
板凳
lmj9201 [专家分：1400] 发布于 2006-02-16 18:53:00
应该是这样
var s:string;
l:char;
begin
s:='abcd';
l:=s[1];
writeln(l);
end.
3 楼
贺天行宝 [专家分：2300] 发布于 2006-02-16 20:19:00
var s:string;
l:string;
begin
s:='abcd';
l:=copy(s,1,1);
writeln(l);
end.
呵呵
4 楼
pascaler [专家分：150] 发布于 2006-02-17 17:48:00
试过了，三楼的方法行不通。
错误提示；error in linking
5 楼
pascaler [专家分：150] 发布于 2006-02-17 17:48:00
搞错了，是提示：error while linking
6 楼
pascaler [专家分：150] 发布于 2006-02-17 17:52:00
哦，对不起，是系统问题，我又搞错了
7 楼
编程黑客 [专家分：1660] 发布于 2006-02-26 21:25:00
应该是这样
var s:string;
l:char;
begin
s:='abcd';
l:=s[1];
writeln(l);
end.
8 楼
aniude [专家分：430] 发布于 2006-03-20 22:40:00
var
s,i:string;
j:integer;
begin
s:='abcd';
i:=copy(s,2,2);
write(i);
read(j);
end.
我来回复
您所在位置：