Курсовая работа: курсовые

Label6: TLabel;

Label7: TLabel;

procedure Edit1MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Edit2MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Edit3MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Edit4MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure FormMouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button1MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

procedure Button2MouseMove(Sender: TObject; Shift: TShiftState; X,

Y: Integer);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

x,v,a,b,r,r2,h,eps,lam,lap: extended;

n: integer;

implementation

{$R *.dfm}