t_id
313
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
525543584 | 948202 | True | False | Successfully run |
Record count: 1
{ Old file: tbs0065.pp } { shows that frac() doesn't work correctly. OK 0.99.1 (PFV) } Program Example27; { Program to demonstrate the Frac function. } Var R : Real; begin Writeln (Frac (123.456):0:3); { Prints O.456 } Writeln (Frac (-123.456):0:3); { Prints -O.456 } end.