1992 1415126
Var Nazva. String:
R, Period: Real,
ConstPi = 3.1415-226;
begin;
Nazva := Editi.Text;
R = Edit2.Text;
V = Edit3. Text,
Period := 2 *Pi R 7. V-24
Edit 4Text := FloatToStr (Period:
ShowMessage ( Pik Ha raheri F + Nazva - Tpbae
FormatFloat ("#0.00*, Period) + mi6!):
end:
де тут помилка?