1. Как называется класс, который приведен на примере ниже? type TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; procedure Button1Click(Sender: TObject); . . . end; 2. Что обозначает выражение (TForm) в строке TForm1 = class(TForm)? 3. Выпишите название полей, приведенных ниже? TDenartament=class private fsotrudnic: string[15]; faddress: string[15]; constructor create; function Getname: Tname; function Getaddress: Taddress; procedure Setaddress: Taddress; public procedure show; . . . 4. Выпишите название методов, приведенных ниже? type TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; procedure Button1Click(Sender: TObject); procedure ComboBox1Click(Sender: TObject); . . . end; 5. Что обозначает следующие выражения? var Form1:TForm;