richtig rechnen !!!

[homerunjack]

Ich habe hier einen kleinen Quellcode, in dem einfach nur gerechnet wird. Es wird im ersten teil * gerechnet, in den anderen beiden teilen / . nur klappt das in dem ersten abschnitt nicht wirklich:

Delphi-Quellcode:

var s, v, t: real;
begin
if RadioButton1.Checked then
t:= strtofloat(edit1.text);
v:= strtofloat (edit2.text);
[color=#ff005f]s:= v*t;[/color]
Edit3.text:= floattostr(s);


if RadioButton2.Checked then
s:= strtofloat(edit1.text);
t:= strtofloat (edit2.text);
v:= s/t;
Edit3.text:= floattostr (v)          ;


if RadioButton3.Checked then
s:= strtofloat(edit1.text);
v:= strtofloat (edit2.text);
t:= s/v;
Edit3.text:= floattostr (t)          ;




end;

wie kann man das mit else if schreiben?