1. Как называется класс, который приведен на образце ниже?type TForm1 =

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;