# Pastebin dhhrEVME
So the declaration is like a function but the result is named in header Operator or (r1,r2 : Rec) z : Boolean;  
 
begin  
  z:=(R1.a or R2.a) and (R1.b or r2.b)  
end;