Тут появляется несколько вариантов выхода:
- записывать результат в переменную вещественного типа, но он подходит не всегда, поэтому лучше перейти сразу ко второму методу;
- округлять результат;
- использовать для деления div, который получает только целое число.
Для начала взглянем на последний вариант:
var
i:Integer; begin
i:=10 div 2; end;
Теперь посмотрим округление. Для него существует очень удобная функция round, которой передается в качестве параметра вещественное число, а на выходе получаем целое, например:
var
i:Integer; begin
i:=round(10/2) ; end;
Если вы решили хранить результат в переменной вещественного типа, то могут возникнуть проблемы с выводом результата. Для этого может понадобиться преобразование вещественного числа в строку. Для этого есть функция FioatTostr, которой надо передать дробное число и получить строку. Точно так же есть и обратное преобразование strToFioat, где вы передаете строку, а получаете вещественное число.
Отдельного разговора требует функция FormatFioat, которая форматирует вещественное число по вашим нуждам. Тут есть два параметра: строка формата и само число. В табл. 10.1 показаны разные варианты преобразований. В первой колонке представлены возможные форматы, указываемые в первом параметре функции FormatFioat. В остальных колонках показано, что произойдет с разными числами при данном формате.
- записывать результат в переменную вещественного типа, но он подходит не всегда, поэтому лучше перейти сразу ко второму методу;
- округлять результат;
- использовать для деления div, который получает только целое число.
Таблица 10.1. Строки форматирования вещественных чисел
|