谁是小偷 — 编程爱好者社区

主题：谁是小偷

2007lily [专家分：0] 发布于 2007-12-06 16:16:00

有Ａ、Ｂ、Ｃ、Ｄ四名偷窃嫌疑犯，其中一人是小偷，审问中，Ａ说：“我不是小偷”，Ｂ说：“Ｃ是小偷”，Ｃ说：“小偷肯定是Ｄ”，Ｄ说：“Ｃ
在冤枉人”，有三人说真话，一人说假话，问到底谁是小偷？

[fly]帮忙了！！！[/fly]

最后更新于：2007-12-06 16:26:00

本帖地址： http://bbs.pfan.cn/post/261290.html

回复列表（共5个回复）

沙发

angwuy [专家分：2280] 发布于 2007-12-06 18:07:00

C说假话,C是小偷

板凳

小地小地 [专家分：300] 发布于 2007-12-06 20:05:00

在这里出奥数题?如果要变成:
1 用个for 'a'..'d'
2 判断真假
3 输出

3 楼

小地小地 [专家分：300] 发布于 2007-12-06 20:06:00

上面我打错了应该是编程

4 楼

Lovely哆啦 [专家分：1360] 发布于 2008-02-05 11:43:00

var thief:char;
begin
for thief:='a' to 'd' do
if ord(thief<>'a')+ord(thief='c')+ord(thief='d')+ord(thief<>'d')=3 then writeln(thief);
end.

5 楼

pascal玩家 [专家分：280] 发布于 2008-07-01 13:37:00

program lx;
  var a:char;
  begin
    for a:='A' to 'D' do
      if ord(a<>'A')+ord(a='C')+ord(a='D')+ord(a<>'D')=3 then
      begin writeln(a); exit; end;
  end.

我来回复

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

主题：谁是小偷

回复列表（共5个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：谁是小偷

回复列表 （共5个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

回复列表（共5个回复）