[doctordradd]

День добрый.
Подскажите, пожалуйста, где ошибка в вычислении среднего арифметического, и как округлить результат до 2-х знаков после запятой.
Компилится но выдает ошибку при введении числа:Exception class EConvertError with message ''''' is not a valid integer value'.
Спасибо

Код:

procedure TForm1.Edit1Change(Sender: TObject);
var
   i,sum,kol: integer;
   sr:real;
begin
    sum:=Strtoint(Edit1.Text)+Strtoint(Edit2.Text);
    kol:=2;
    sr:=sum/kol;
    Label1.Caption:=Floattostr(sr);
end;