否则程序错误

Question

第一个else报错，说不是预期的

另外，如果有人愿意在 Skype 中加我，这样我就可以问这些基本问题，这将有很大帮助。

Program Game ;

var answer: string;

Begin

writeln('(======= MENU =======)');
writeln('-------- PLAY --------');  
writeln('-------- HELP --------');
writeln('-------- EXIT --------');

repeat

writeln('Pick PLAY, HELP or EXIT');
readln(answer);

if answer = 'EXIT' then
      writeln();
      writeln('Write EXIT again!')
    else 
      if answer = 'HELP' then
    writeln();
    writeln('Simple commands like observe, look, take.')
      else 
    if answer = 'PLAY' then
    writeln();
            writeln('You are in a cave!');

until answer = 'EXIT';

End.

Answer 1

Pascal 期望在 if 和 else 之间有一个语句。它错误地理解了您的代码：

if answer = 'EXIT' then
    writeln(); (* one statement *)

writeln('Write EXIT again!') (* unrelated to the "if" above *)

else (* error - no preceding "if" *)

解决方案是，使用begin和end将2条语句合二为一：

if answer = 'EXIT' then
  begin
    writeln();
    writeln('Write EXIT again!')
  end
else
...

否则程序错误

Else Error in program

pascal