[Sharky]

Ну так как в эдиты ты вводиш строки а перемножаются не строки а числа то тебе нужно из строки получить число делается в делфи это очень просто вот такой фунцией - StrToInt для целого числа
floatTostr для дробного ;
вот твоя программа

Код:

procedure TForm1.Button2Click(Sender: TObject);
 var
  a,b,c:real; //  тип с плавуещей точнкой 
   begin
    a:=StrToFloat(form1.Edit1.Text);// из текста делаем цисло
    b:=StrToFloat(form1.Edit2.Text);// из текста делаем цисло
    a:=Exp(3*ln(a)); // возволим в куб
    b:=Exp(3*ln(b)); // возволим в куб
    c:=(a+b)/2; //  основной подсщет
    Edit3.Text:=FloatTostr(c); // вывод результата 
  end;