Произвести вычисление значений функций. Результаты вычислений вывести в компонент ListBox

[Настенька..Блонди]

Произвести вычисление значений функций. Результаты вычислений вывести в компонент ListBox. Выбор вычисляемой функции производить, используя компонент RadioButton.

Arcctg
Функций:22, 5, 3

Задачка на Делфи

заранее сапибо))))

[Terran]

Можете оптимизировать код в случае надобности.

Procedure TForm1.Button1Click(Sender: TObject);
Begin
If RadioButton1.Checked=True Then
Begin
ListBox1.Items.Add(FloatToStr(ArcTan(22)));
End;
If RadioButton2.Checked=True Then
Begin
ListBox1.Items.Add(FloatToStr(ArcTan(5)));
End;
If RadioButton3.Checked=True Then
Begin
ListBox1.Items.Add(FloatToStr(ArcTan(3)));
End;
End;