z3_1:= (Round((StrToFloat(sEdit8.Text)*i)/2))+i; //половина основания
Сайт
Форум
FAQ
Соглашения
Прочее