t_id
328
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
526342408 | 948339 | True | False | Successfully run |
Record count: 1
{ Old file: tbs0091.pp } { missing standard functions in constant expressions OK 0.99.7 (PFV) } { Page 22 of The Language Guide of Turbo Pascal } var t: byte; const a = Trunc(1.3); b = Round(1.6); c = abs(-5); ErrStr = 'Hello!'; d = Length(ErrStr); e = Lo($1234); f = Hi($1234); g = Chr(34); h = Odd(1); i = Ord('3'); j = Pred(34); l = Sizeof(t); m = Succ(9); n = Swap($1234); o = ptr(0,0); Begin end.