unit Question1_1_u;

// Add your name and surname
interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls;

type
  TForm1 = class(TForm)
    pnlTop: TPanel;
    pnlInput: TPanel;
    pnlOutput: TPanel;
    lblLength: TLabel;
    lblWidth: TLabel;
    edtLength: TEdit;
    edtWidth: TEdit;
    btnCalcArea: TButton;
    btnCalcAmount: TButton;
    lblAmount: TLabel;
    lblArea: TLabel;
    procedure btnCalcAreaClick(Sender: TObject);
    procedure btnCalcAmountClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.btnCalcAmountClick(Sender: TObject);
begin
  // 1.1.2 Add code here
end;

procedure TForm1.btnCalcAreaClick(Sender: TObject);
begin
  // 1.1.1 Add code here
end;

end.
