需要关于错误的帮助我不断进入验证功能 - pascal

Question

这是我的代码

program val;
uses crt;

var
  UI:string;
  x:integer;
  error:integer;

begin
  repeat
  readln(UI);
  val(UI,x,error);
  until error = 0 ;
  writeln(UI)
end;

我收到此错误：

  

    

      

validationfunctions.pas（12,9）致命：语法错误，“。”预期，但“（”发现

    

  

任何帮助？

Answer 1

您需要在最终;之后将end更改为句点（点）。 （当你正在使用它时，修复缩进样式以使程序流畅。）

program val;
uses crt;

var
  UI:string;
  x:integer;
  error:integer;

begin
  repeat
  readln(UI);
  val(UI,x,error);
  until error = 0 ;
  writeln(UI);     { I added a missing ;, even though not required }
end.               { <-- fix this line - it is required}

此外，您已将自己的计划命名为val，并且您还尝试使用该功能val()。将程序命名为内部函数是一个非常糟糕的主意。如果您坚持这样做并且您正在使用的编译器存在问题，您通常可以通过在函数调用之前显式添加单元名来修复它，如System.Val(UI, x, error);。