Difference between revisions of "Round/ru"

From Free Pascal wiki
Jump to navigationJump to search
(Created page with "Модуль System, входящий в состав RTL, содержит функцию '''Round''', которая округляет зна...")
 
Line 1: Line 1:
 +
{{Round}}
 +
 
[[System unit/ru|Модуль System]], входящий в состав [[RTL/ru|RTL]], содержит функцию '''Round''', которая округляет значение типа [[Real/ru|real]] до значения типа [[Integer/ru|integer]].
 
[[System unit/ru|Модуль System]], входящий в состав [[RTL/ru|RTL]], содержит функцию '''Round''', которая округляет значение типа [[Real/ru|real]] до значения типа [[Integer/ru|integer]].
 
Её входным параметром является выражение вещественного типа, и '''Round''' возвращает значение типа [[Longint/ru|longint]], округленное до ближайшего целого числа. Если входное значение находится точно посередине между двух целых чисел - N.5 - то используется  "банковское округление", в результате которого значение округляется до ближайшего четного числа.
 
Её входным параметром является выражение вещественного типа, и '''Round''' возвращает значение типа [[Longint/ru|longint]], округленное до ближайшего целого числа. Если входное значение находится точно посередине между двух целых чисел - N.5 - то используется  "банковское округление", в результате которого значение округляется до ближайшего четного числа.

Revision as of 21:45, 22 March 2018

Deutsch (de) English (en) Esperanto (eo) suomi (fi) русский (ru)

Модуль System, входящий в состав RTL, содержит функцию Round, которая округляет значение типа real до значения типа integer. Её входным параметром является выражение вещественного типа, и Round возвращает значение типа longint, округленное до ближайшего целого числа. Если входное значение находится точно посередине между двух целых чисел - N.5 - то используется "банковское округление", в результате которого значение округляется до ближайшего четного числа.

Объявление:

function Round(X: Real): Longint;
begin
   WriteLn( Round(8.7) );
   WriteLn( Round(8.3) );
   // примеры "банковского округления" - .5 округляется до ближайшего четного числа
   WriteLn( Round(2.5) );
   WriteLn( Round(3.5) );
end.

Выход:
9
8
2
4

См. также: