Точні науки програмування Delphi 5.0

RadioButton1: TRadioButton;

RadioButton2: TRadioButton;

RadioButton3: TRadioButton;

Edit7: TEdit;

Edit8: TEdit;

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

Label6: TLabel;

Label7: TLabel;

procedure RadioButton1Click(Sender: TObject);

procedure RadioButton2Click(Sender: TObject);

procedure RadioButton3Click(Sender: TObject);

procedure Button1Click(Sender: TObject);

private

{ Private declarations }

public

st1, st2, st3, st4, st5, S: double;

str_S: string; { Public declarations }

code:integer;

end;

var

Form1: TForm1;

implementation

{$R *.DFM}