В OSCAT есть функции для вычислений с двойной точностью.
Не знаю нужно ли для выходной переменной kwt такая точность. Если оставить ее REAL, то максимальное количество знаков в у нее будет 7, т.е. 9999999 или 999999.9 или 99999.99. Подходит ли такое разрешение по условию задачи?