Difference between revisions of "Round"
From Lazarus wiki
Jump to navigationJump to searchm |
|||
Line 5: | Line 5: | ||
'''Declaration:''' | '''Declaration:''' | ||
− | + | <syntaxhighlight> | |
− | + | function Round(X: Real): Longint; | |
+ | </syntaxhighlight> | ||
+ | <br> | ||
<syntaxhighlight> | <syntaxhighlight> | ||
begin | begin | ||
Line 18: | Line 20: | ||
'''Output:'''<br/> | '''Output:'''<br/> | ||
− | + | <pre> | |
− | 8 | + | 9 |
− | 2 | + | 8 |
− | 4< | + | 2 |
+ | 4 | ||
+ | </pre> | ||
See also: | See also: |
Revision as of 17:17, 29 May 2018
│
Deutsch (de) │
English (en) │
Esperanto (eo) │
suomi (fi) │
русский (ru) │
The RTL System unit contains function Round, which rounds a Real-type value to an Integer-type value. It's input parameter is a real-type expression and Round returns a Longint value that is the value of the input rounded to the nearest whole number. If the input value is exactly halfway between two whole numbers - N.5 - then "bankers rounding" is used, with the result being the nearest even number.
Declaration:
function Round(X: Real): Longint;
begin
WriteLn( Round(8.7) );
WriteLn( Round(8.3) );
// examples of "bankers rounding" - .5 is adjusted to the nearest even number
WriteLn( Round(2.5) );
WriteLn( Round(3.5) );
end.
Output:
9 8 2 4
See also: