Другие языки программирования и технологии

Paskal. Как округлять числа в паскале?

Frac Дробная часть числа с плавающей запятой

Int Целая часть числа с плавающей точкой

Round Округление чисел с плавающей запятой до целого числа

Round(12.75) = 13
Trunc(12.75) = 12
Int(12.75) = 12
Олег Овчинников
Олег Овчинников
1 809
Лучший ответ
Андрей Иноземцев Int(12.75) = 12-то что мне нужно, спасибо
Round: Округляет значение вещественного типа до значения целочисленного типа.

Объявление: Function Round(X: Real): Longint;
Режим: Windows, Real, Protected

Замечания:

X - выражение с реальным типом. Round возвращает значение типа Longint, которое является значением X, округленного к самому близкому целому числу. Если X - ровно посередине между двумя целыми числами, то результатом будет число с самой большой абсолютной величиной.

Если округленное значение X ненаходится внутри допустимого диапазона Longint, то происходит ошибка во время выполнения программы.

Пример функции Round

Begin
WriteLn(1.4, ' округленно = ', Round(1.4));
WriteLn(1.5, ' округленно = ', Round(1.5));
WriteLn(-1.4, ' округленно = ', Round(-1.4));
WriteLn(-1.5, ' округленно = ', Round(-1.5));
End.
при выводе чтоли?

writeln('chislo a ravno',a:2);

:2 это до какого символа после запятой выводить число (то есть оно округляется)
пусть а=3,3333333

тогда а: 4 равно 3,3333

минимальное значение при округлении равно 2.

p.s. не Paskal а Pascal
Никодим Чудов
Никодим Чудов
1 196
Алексей Алеев не работает твоя формула
Игорь Владимирович Spizdil
s saita, kotrii odin iz 1-h
Виктор Алексеквский Это не округление, а форматный вывод) Так что не катит)
Знаю способ ещё легче. Если тебе нужно до целого числа округлить, то Round(X), если тебе нужно округлять до десятых, то можно схитрить X:=(Round(X*10))/10; Если округление до сотых, то вместо 10 вписываешь 100 и т. д. по прогрессии.
Турлыхан Шайдоллаев Оо, спасибо за идею
Александр Иоффе Я даже и сразу не догадался. Спасибо :)

Похожие вопросы