program types(input,output);
  type alpha = record a: integer; b:real end;
       beta = alpha;
begin
end.