unit Unit1;

interface
Uses
   Classes;

Type

Osoba = class
public
   nazwisko    : String[25];
   imie        : String[15];
end;

Prostokat = class
public
   x1          : Integer;
   y1          : Integer;
   x2          : Integer;
   y2          : Integer;
end;

Zaglowka = class
public
   ilosc_zagli : Integer;
   max_il_osob : Integer;
   max_kg      : Integer;
end;

implementation

end.
