fpc/bugs/bug0115.pp
1998-03-26 10:41:55 +00:00

11 lines
89 B
ObjectPascal

var
c : comp;
begin
c:=1234;
writeln(c);
readln(c);
writeln(c);
end.