program Project1;
{$mode objfpc}{$H+}
uses sysutils;
type
TAbc=class end;
var
a:TAbc;
begin
writeln(BoolToStr(a is TObject,'true','false'));
readln;
end.
cHJvZ3JhbSBQcm9qZWN0MTsKeyRtb2RlIG9iamZwY317JEgrfQp1c2VzIHN5c3V0aWxzOwp0eXBlCiAgVEFiYz1jbGFzcyBlbmQ7CnZhcgogIGE6VEFiYzsKYmVnaW4KICB3cml0ZWxuKEJvb2xUb1N0cihhIGlzIFRPYmplY3QsJ3RydWUnLCdmYWxzZScpKTsKICByZWFkbG47CmVuZC4g