Hello i have problem with this program
procedure TForm1.RadioGroup1Click(Sender: TObject);
var a,b,V,S,O:real;
begin
a:=Floattostr(Edit1.Text);
b:=Floattostr(Edit2.Text);
if RadioGroup1.ItemIndex=0 then V:=a*a*a;
Edit3.Text.Caption:=StrtoFloat(Edit3.Text);
else if RadioGroup1.ItemIndex=1 then S:=(a*a)*6;
Edit3.Text.Caption:=StrtoFloat(Edit3.Text);
else if RadioGroup1.ItemIndex=2 then O:=a+b;
Edit3.Text.Caption:=StrtoFloat(Edit3.Text);
end;
end.
It shows me errors but i dont know why