某游戏源代码，玩之前把属性中一项英文调成中文即可
program wangzhijian;
var
a:char;
begin
write('XXX是禽兽吗?是Y/不是N');
readln(a);
if a='y'
then writeln('我同意你的观点,他确实是禽兽')
else
if a='n'
then writeln('我明白你的意思，他确实禽兽不如')
else writeln('其实。。只要输入Y或者N就可以了，你是眼睛不好，还是智商有问题?');
readln;
readln
end.
