密码问题 — 编程爱好者社区

您所在位置：社区首页 — 信息学奥赛 — 密码问题

主题：密码问题

天水 [专家分：320] 发布于 2005-08-18 21:37:00

输入一个或多个个字母，程序输出字母的后第4个字母。
     如：输入A,输出D   输入BC输出EF.
          谢谢各位大虾不吝赐教。：-）   （请用pascal)
[fly]互相帮助   共同进步[/fly]

21 楼

bnm568 [专家分：0] 发布于 2005-09-07 19:53:00

请问各位你们的方法在任何系统下都能使用吗

22 楼

天水 [专家分：320] 发布于 2005-09-09 17:28:00

to:上楼，
听说pascal在win98环境中最好，UCDOS可以输入中文，win2000和winXP就
不可以输入中文，我也不知道为什么，请各位前辈再答答。
小弟这厢有礼了。[em18][em16]

23 楼

天水 [专家分：320] 发布于 2005-09-18 16:50:00

谢谢论坛上的大哥大姐；
另：
   急需pascal奥赛书籍(中学版），各位大哥帮帮忙，有的请回我贴，再联系，或写信给我。我寄钱去时出版社已没货~~！~·！唉！！
        邮箱：bad.boy01@126.com
                                   跪谢！

24 楼

Quesetr [专家分：0] 发布于 2005-09-21 22:00:00

自己写这个自己应该会写的还问？

25 楼

沙漠笨鸟 [专家分：220] 发布于 2005-09-27 00:47:00

Var
  i:string;
  j,k:integer;
Begin
  Readln(i);
  for j:=1 to length(i) do
    for k:=1 to 3 do i[j]:=inc(i[j]);
  Writeln(i);
End.

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