[lmikle]

Ну, результат похож на ожидаемый.
То, что ты получаешь, это 5.5 умноженное на 10 в -17 степени. Так называемое экспоненциальное представление.
Во первых, лучше пользоваться типом Double.
Во вторых, судя по названию переменной income, ту работаешь с денежными данными. Для таких данных сущетсвует специальный тип - Currency.
В третьих, если уж так надо использовать вещественные данные, то можно просто результат округлять до нужной точности, например, с помощью функции RoundTo или использовать форматирование - Format("%.3f",[z6+income=z18]).