Ответ:
ну тут все просто, открываешь Visual studio или любую другой компилятор и пишешь туда такой код
Объяснение:
procedure TForm1.Button4Click(Sender: TObject);
var a,b,result:real;
begin
a:=StrToFloat(edit1.Text);
b:=StrToFloat(edit2.Text);
result:=a/b;
edit3.Text:=FloatToStr(result);
end;
begin
a:=StrToFloat(edit1.Text);
b:=StrToFloat(edit2.Text);
result:=a+b;
edit3.Text:=FloatToStr(result); { IntToStr}
end;
end.