Germany | Finland | Saint Petersburg | Drive

Int - отбросить дробную часть

Опубликовано в QPILE

Понадобилась функция, отбрасывающая дробную часть в числе и возвращающая целое.

' Отбрасывает дробную часть. Возвращает целое
FUNC Int(result)
     if 0+result < 0
         result = Ceil(Result)
     else
         result = Floor(result)
     end if
END FUNC
Добавить комментарий