2个回答
展开全部
字符串变量名为ss 是吧? 给你个例子
比如: ss:='Hello!'
function bcc(str:string):string;
var
c:string;
i:integer;
begin
for i:=1 to length(str) do
c:=c+chr( ord(copy(str,i,1)[1]) xor 124);
result:=c;
end;
结果: bcc(ss) 等于 4]
比如: ss:='Hello!'
function bcc(str:string):string;
var
c:string;
i:integer;
begin
for i:=1 to length(str) do
c:=c+chr( ord(copy(str,i,1)[1]) xor 124);
result:=c;
end;
结果: bcc(ss) 等于 4]
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询