t_id
1367
t_adddate
2004/09/17
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:28:00 26 | 2024/05/21 02:03:00 35 | |
i386 | 24 | 48.0 | 2024/05/21 01:33:00 43 | 2024/05/21 01:58:00 33 | |
x86_64 | 24 | 48.0 | 2024/05/21 01:28:00 26 | 2024/05/21 02:03:00 22 | |
aarch64 | 2 | 4.0 | 2024/05/21 01:46:00 38 | 2024/05/21 02:03:00 35 | |
linux | 50 | 100.0 | 2024/05/21 01:28:00 26 | 2024/05/21 02:03:00 35 | |
3.3.1 | 29 | 58.0 | 2024/05/21 01:30:00 14 | 2024/05/21 02:03:00 35 | |
3.2.3 | 21 | 42.0 | 2024/05/21 01:28:00 26 | 2024/05/21 02:01:00 34 |
{ Source provided for Free Pascal Bug Report 3324 } { Submitted by "Tom Verhoeff" on 2004-09-15 } { e-mail: T.Verhoeff@tue.nl } program ReadCharSubrange; { Demonstrates bug in 1.9.5 when reading into a subrange of Char } const MinChar = 'a'; MaxChar = 'z'; type Subrange = MinChar .. MaxChar; var c: Subrange; begin write ( 'Type a character in the range ', MinChar, ' .. ', MaxChar, ': ' ); c:='b'; if c='a' then begin readln ( c ); writeln ( 'c = ', c ); end; end.