If statement Pascal if then else不';行不通

If statement Pascal if then else不';行不通,if-statement,pascal,freepascal,If Statement,Pascal,Freepascal,我对帕斯卡有意见。我在学校学习它,因为我已经使用Java了,我有点困惑。但这并不是它不起作用的确切原因。我试图制作一个简单的if(condition)write(this)else write(that)程序,在cmd中运行。 当我试图编译下面的代码时,它说,我必须编写一个而不是else,但这似乎很奇怪 program Project1; var max : integer; var max2 : integer; begin writeln('Max: Oh no, I'm an i

我对帕斯卡有意见。我在学校学习它,因为我已经使用Java了,我有点困惑。但这并不是它不起作用的确切原因。我试图制作一个简单的if(condition)write(this)else write(that)程序,在cmd中运行。 当我试图编译下面的代码时,它说,我必须编写一个
而不是
else
,但这似乎很奇怪

program Project1;
var max : integer;
var max2 : integer;

begin
    writeln('Max: Oh no, I'm an integer');
    writeln('Which integer is max supposed to be?');
    readln (max);
    writeln('Max: I don't want to be a', max);
    writeln('Multiply Max');
    readln (max2);

    if (max = max * max2) then
        writeln('NO, I do not want to be a', max);
    else
        writeln('I think I could live with being a ', max * max2);

    readln;
end.   

试着修正书写中的撇号,看看这是否有帮助:


试着修正书写中的撇号,看看这是否有帮助:

问题在于if语句,因为if只是一行,不需要用“;”来结束这行,而was是字符串行的问题,所以不要在字符串中间使用“'”


问题在于if语句,因为if只是一行,不需要用“;”来结束这行,而was是字符串行的问题,不要在字符串中间使用“'”

我真的不明白,我在writeln中使用了和撇号。其中的一个是结束显示文本。(我希望它打印max的值)writeln('max:Oh-no,我是整数');writeln('Max:我不想成为一个,'Max');你可以看到,为什么我在编辑后的回复中这么做。。。(忘了在那里写了)我真的不知道我在哪里用了撇号。其中的一个是结束显示文本。(我希望它打印max的值)writeln('max:Oh-no,我是整数');writeln('Max:我不想成为一个,'Max');你可以看到,为什么我在编辑后的回复中这么做。。。(忘了在那里写了)问题在于字符串行,因为“你太早就把它关起来了,如果statment if有一行,你就不需要使用了;在此之前,您应该解释您提供的修复,而不是发布简单的代码更改。如果你不解释为什么代码需要更改,你就没有提供任何知识。问题在于字符串行,因为“你太早关闭它,如果statment If有一行你不需要使用;在此之前,您应该解释您提供的修复,而不是发布简单的代码更改。如果您不解释代码需要更改的原因,那么您在这里就没有提供任何知识;双撇号,双撇号充当逃避:Writeln('我不想成为一个',max);
program Project1;
var max : integer;
var max2 : integer;
begin
writeln('Max: Oh no, Im an integer');
writeln('Which integer is max supposed to be?');
readln (max);
writeln('Max: I dont want to be a', max);
writeln('Multiply Max');
readln (max2);
if (max = max * max2) then
 writeln('NO, I do not want to be a', max)
 else
  writeln('I think I could live with being a ', max * max2);

readln;
end.