Помощь - Поиск - Пользователи - Календарь
Полная версия: Округление вещественного числа до сотых
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Jeeb
Доброго времени суток всем!

Есть задачка...

В ней надо округлить Y:real до сотых. Как это осуществить? не врубаюсь...

Зранее спасибо...
volvo
Что значит "округлить"? При выводе или как?

Если при выводе, то:
Var x: Real;
begin
x := 1.2345;
WriteLn('x = ', x:6:2); { Вторая цифра - количество знаков для округления }
end.


А можно так:
Var
Y: real;
Begin
Y := Trunc(Y*100) / 100;
End;

- получаешь то же число, округленное до сотых... (хотя могут быть и накладки, ведь Trunc просто отсекает дробную часть, фактически не округляя)
Jeeb
спасибо! как раз это и надо было!
Гость
спасибо, и мне помогли
как раз это искала:
"Если при выводе..."
Ulyana
Цитата(Jeeb @ 7.02.2006 2:35) *

Доброго времени суток всем!

Есть задачка...

В ней надо округлить Y:real до сотых. Как это осуществить? не врубаюсь...

Зранее спасибо...

допустим создаем переменную q:real;
теперь пишем q:=y:0:2 (если до сотых)
то есть выбираете цифру-сколько нужно цыфр после запятой,и пишите,как показано выше
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.