t_id
409
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
524374674 | 948005 | True | False | Successfully run |
Record count: 1
{ Old file: tbs0206.pp } { sets with variable ranges doesn't work OK 0.99.11 (PFV) } PROGRAM SetRange_Bug; CONST a:char='A';z:char='Z'; VAR s:set of char;c:char; BEGIN s:=[a..z]; for c:=#0 to #255 do if c in s then write(c); writeln; END.