Перешел на другую задачу, необходима такая функция как в лазарусе RealToInt и IntToReal, проблеммы с циклом FOR TO DO, она не работает с переменными Real,  X^n, в КП результат X^n возврашается как Real, а мне необходимо найти функцию которая возврашалабы Integer