Помогите с Delphy задача написана, не хватает только чтоб ответ выводило в Edit2. Как это сделать?

procedure TForm1.Button1Click(Sender: TObject);
begin
x:=StrtoInt(Edit1.Text);
x:=((sin(sqr(x)-1)*(sin(x)/cos(x)))/(1+sqrt(sqr(x)+7)));
g:=Trunc(x);
s:=InttoStr(g);

собственно сам костяк, а как ответ получить на Edit2 не знаю (