Explorar o código

* fixed expected high value

peter %!s(int64=21) %!d(string=hai) anos
pai
achega
a966964657
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      tests/webtbs/tw3113.pp

+ 1 - 1
tests/webtbs/tw3113.pp

@@ -9,7 +9,7 @@ var i:Integer;
 begin
  Writeln(High(A));
 
- if High(A)<>1 then
+ if High(A)<>0 then
    begin
      writeln('Error!');
      halt(1);