t_id
418
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
Result type | Cat. | Count | Percentage | First date | Last Date |
Successfully run | 50 | 100.0 | 2024/05/21 01:10:00 32 | 2024/05/21 01:42:00 0 | |
i386 | 39 | 78.0 | 2024/05/21 01:10:00 32 | 2024/05/21 01:41:00 0 | |
x86_64 | 10 | 20.0 | 2024/05/21 01:21:00 14 | 2024/05/21 01:42:00 0 | |
aarch64 | 1 | 2.0 | 2024/05/21 01:29:00 35 | 2024/05/21 01:29:00 35 | |
linux | 50 | 100.0 | 2024/05/21 01:10:00 32 | 2024/05/21 01:42:00 0 | |
3.3.1 | 26 | 52.0 | 2024/05/21 01:12:00 28 | 2024/05/21 01:40:00 0 | |
3.2.3 | 24 | 48.0 | 2024/05/21 01:10:00 32 | 2024/05/21 01:42:00 0 |
{ Old file: tbs0216.pp } { problem with with fields as function args OK 0.99.11 (PM) } type rec = record a : Longint; b : Longint; c : Longint; d : record e : Longint; f : Word; end; g : Longint; end; const r : rec = ( a : 100; b : 200; c : 300; d : (e : 20; f : 30); g : 10); begin with r do begin Writeln('A : ', a); if a<>100 then halt(1); Writeln('B : ', b); if b<>200 then halt(1); Writeln('C : ', c); if c<>300 then halt(1); Writeln('D'); with d do begin Writeln('E : ', e); if e<>20 then halt(1); Writeln('F : ', f); if f<>30 then halt(1); end; Writeln('G : ', g); if g<>10 then halt(1); end; end.