Строку с formgettext убрать. Не ясно вообще зачем она здесь.
А showtextbox вызывать так:
ShowTextBox('Ответ:',''+X , 200, TF_NUMERIC);
Но кроме всего этого в формуле x надо использовать не ссылки на поля ввода(a1,a2 и т.д.), а данные из этих полей, которые можно получить функцией FormGetText