Для того чтобы найти целую часть вещественной переменной х , используют функцию алгоритмического языка Паскаль :
int(x)
round(x)
frac(x)
sgrt(x)