逻辑问题一:谁是案犯?

 

题目描述

商场发生盗窃案,根据线索提审四个嫌疑人:甲、乙、丙、丁供词如下:
甲说:我看见是乙偷的
乙说:不是我,是丙偷的
丙说:乙在撒谎,他想陷害我
丁说:我不知道,反正我没偷
公安人员对案情进行了调查,案情真相大白。小偷就是四人之中一个,并且只有一个供词说了真话,其余三个说的是假话。谁是案犯?

输入

无输入

输出

一行:输出案犯对应的字符。甲、乙、丙、丁分别用A、B、C、D表示

样例输入

 

样例输出

A或B或C或D

 

var
    a,b,c,d:longint;
begin
    for a:=0 to 1 do
    for b:=0 to 1 do
    for c:=0 to 1 do
    for d:=0 to 1 do
        if (ord(b=1)+ord(c=1)+ord(c=0)+ord(d=0)=1)and(a+b+c+d=1) then
            case a*1000+b*100+c*10+d of
                1000:writeln('A');
                100 :writeln('B');
                10  :writeln('C');
                1   :writeln('D');
            end;
end.

  

转载于:https://www.cnblogs.com/qilinart/articles/5448407.html

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值