我在 Pascal 中的 if 函数无法正常工作

Question

我在使用 if,then,else in pascal 时遇到一些问题。我刚开始做测验之类的东西，但遇到了一些问题。这是我的代码：

program question;

var a:char;

 begin
 writeln('Whats the capital of France?');
 readln(a);

 if a='Paris' then
    writeln('Correct answer!!')
 else
    writeln ('Wrong answer!!');

 readln
 end.

如果答案不是 paris，则第二部分工作正常，而不是说它错了那很好，但第一部分并没有真正工作。当我回答巴黎时，它说了错误的答案。所以如果有人能帮助我，我将非常感激。

Answer 1

您需要小写或大写您的答案才能做出不区分大小写的问题。此外，您在 if 中比较的值必须小写才能起作用。您还必须为 a 变量使用类型字符串：

program question;

var a: string;

 begin
 writeln('Whats the capital of France?');
 readln(a);
 a := LowerCase(a);

 if a='paris' then
    writeln('Correct answer!!')
 else
    writeln ('Wrong answer!!');

 readln
 end.

发生这种情况是因为 "Paris" 不等于 "paris" 或 "PARIS"。

您可以在此处查看此功能：https://onlinegdb.com/HJQiZwoiB

我在 Pascal 中的 if 函数无法正常工作

My if function in pascal doesnt work as i want it to

pascal