t_id
581
t_version
1.1
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
1022164813 | 1027288 | True | False | Successfully run |
Record count: 1
{ %VERSION=1.1 } procedure p1(const a:array of byte); var l : longint; begin l:=length(a); writeln('openarray length: ',l); if l<>9 then halt(1); end; var a : array[2..10] of byte; l : longint; begin l:=length(a); writeln('length of a ',l); if l<>9 then halt(1); p1(a); end.