t_id
1539
t_adddate
2005/03/28
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:54:00 35 | 2024/05/21 02:32:00 35 | |
| i386 | 14 | 28.0 | 2024/05/21 01:58:00 33 | 2024/05/21 02:32:00 27 | |
| x86_64 | 34 | 68.0 | 2024/05/21 01:54:00 35 | 2024/05/21 02:32:00 35 | |
| aarch64 | 2 | 4.0 | 2024/05/21 02:03:00 35 | 2024/05/21 02:19:00 42 | |
| linux | 49 | 98.0 | 2024/05/21 01:54:00 35 | 2024/05/21 02:32:00 35 | |
| win32 | 1 | 2.0 | 2024/05/21 02:04:00 34 | 2024/05/21 02:04:00 34 | |
| 3.3.1 | 28 | 56.0 | 2024/05/21 01:56:00 16 | 2024/05/21 02:32:00 27 | |
| 3.2.3 | 22 | 44.0 | 2024/05/21 01:54:00 35 | 2024/05/21 02:32:00 35 |
{$mode objfpc}{$H+}
uses
classes;
type
stringarty = array of string;
var
ar1,ar2: stringarty;
begin
setlength(ar1,4);
ar2:= copy(ar1,1,3);
if (length(ar2) <> 3) then
halt(1);
ar2:= copy(ar1,1,4);
if (length(ar2) <> 3) then
halt(2);
ar2:= copy(ar1,1,5);
if (length(ar2) <> 3) then
halt(3);
end.