可以推断出或证明外星人到底存不存在的软件

Question

各位大哥说说看，题目如上。这个软件要什么写，提供点思路。我觉得应该是理散数学中的推理题

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
    Application.MessageBox('你认为存在外星人吗？','调查',MB_YESNO);
    ShowMessage('恭喜你答对了');//无论他选什么都答对了
end;

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
begin
    Application.MessageBox('根据CSDN外星人研究所2006年2月22日提供的调查报告显示，外星人是存在的，他已经入籍巴西，现在在皇马工作。','调查',MB_YES);
end;

Answer 3

procedure TForm1.Button1Click(Sender: TObject);
begin
Application.MessageBox('你认为存在外星人吗？','调查',MB_YESNO);
ShowMessage('恭喜你答对了,豬也是這麼想的!');//无论他选什么都答对了
end;

Answer 4

牛！FT
--
Anything one man can imagine, other men can make real.

Answer 5

procedure TForm1.Button1Click(Sender: TObject);
begin
Application.MessageBox('你认为存在外星人吗？','调查',MB_YESNO);
ShowMessage('恭喜你答对了,豬也是這麼想的!');//无论他选什么都答对了
end;haha

Answer 6

begin
楼上的都是外星人；
楼主是黑衣人；
end;

Answer 7

if 你能判断出有外星人 then
   你是白痴
else
   你还是白痴