t_id
47
t_version
1.1
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
{ %VERSION=1.1 } program tinivar; procedure p1; var a : integer = 1; begin writeln(a); if a<>1 then halt(1); inc(a); end; begin p1; p1; end.