var
i:Integer;
begin
fori:=1toLength(hex)do
begin
ifCopy(Hex,1,Length(str))=strthen
begin
Delete(Hex,1,Length(str))
end
else
begin
result:=result+Copy(Hex,1,1);
Delete(Hex,1,1);
end;
end;
end;
来源：网络整理 免责声明：本文仅限学习分享，如产生版权问题，请联系我们及时删除。
相关文章：
在五大新发展理念中，最能体现坚持以人民为中心的发展思04-23
以下属于十九届三中全会之后新组建的国务院机构的是（）。04-23
陆游的名句“纸上得来终觉浅，绝知此事要躬行”可以用来04-23
5000年的中华文明孕育着丰富的生态智慧。“子钓而不纲04-23
“路漫漫其修远兮，吾将上下而求索”出自（），作者（）。04-23
党的十八届三中全会将市场在资源配置中起基础性作用修04-23
“我们不要过分陶醉于我们人类对自然界的胜利。对于每04-23
以下属于十九届三中全会之后新组建的国务院机构的是（）04-23