Pascal：不兼容的類型：得到「LONGINT」預期的「CHAR」

Question

我一直得到「98/39 comp1_〜1.pas 錯誤：不兼容的類型：得到了」LONGINT「預期的」CHAR「，這是關於第6行。任何幫助請。

Function RollBowlDie(VirtualDiceGame : Boolean) : Integer; 
    Var 
    BowlDieResult : Char; 
    Begin 
     If VirtualDiceGame 
     Then BowlDieResult := Random(6) + 1 
     Else 
     Begin 
     Repeat 
      Writeln('Please roll the bowling die and then enter your result.'); 
      Writeln; 
      Writeln('Enter 1 if the result is a 1'); 
      Writeln('Enter 2 if the result is a 2'); 
      Writeln('Enter 3 if the result is a 4'); 
      Writeln('Enter 4 if the result is a 6'); 
      Writeln('Enter 5 if the result is a 0'); 
      Writeln('Enter 6 if the result is OUT'); 
      Writeln; 
      Write('Result: '); 
      Readln(BowlDieResult); 
      If not (BowlDieResult in ['1'..'6']) 
      Then 
       Begin 
       Writeln; 
       Writeln('That was not one of the allowed options. Please try agai:'); 
       End; 
      Until BowlDieResult in ['1'..'6']; 
     End; 
RollBowlDie := Ord(BowlDieResult) - Ord('0'); 
    End; 

Answer 1

那麼，有什麼問題嗎？

BowlDieResult是char，但你給它分配一個longint。

我帕斯卡是有點生疏，但嘗試

BowlDieResult := chr(49 + Random(6));