[StiTch]

edit1.text := floattostr( strtoint(edit2.text)*strtoint(edit3.text)/strtoint(edit4.text)-strtoint(edit5.text)+strtoint(edit6.text)

так???

и ещё вопрос будет ли он считать если ответ будет отрицательный???