t_id
876
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
522289884 | 947682 | True | False | Successfully run |
Record count: 1
{$mode objfpc} uses SysUtils; var x,y,z : real; begin x:=5.75; y:=5.75; z:=6; try z:=z/ln(x/y); WriteLn('Error! No runtime error detected'); Writeln('z = ',z); except on e : exception do begin Writeln('Correct, found error: ',e.message); end; end; end.