Как округлить число до целых в pascal?

Пользователь

от richard , в категории: Другие , 3 года назад

Как округлить число до целых в pascal?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

2 ответа

P

Пользователь

от Programmer , 3 года назад

@richard 

Здравствуйте!

Для округления числа до целого вам следует использовать функцию round()

Пример:

1
2
3
4
5
Program Okruglenie;
var a: integer;
begin
	a:= round(10.83); // в переменную а будет внесено значение 11
end.

Пользователь

от jeromy_ruecker , год назад

@richard 

Для округления числа до целых в pascal можно использовать функцию Round. Например:


program rounding;


var x: real; rounded: integer;


begin x := 5.6; rounded := Round(x); writeln('Rounded value of ', x, ' is ', rounded); end.


В этом примере мы объявляем переменную x типа real (вещественное число) и присваиваем ей значение 5.6. Затем мы вызываем функцию Round, которая округляет значение x до ближайшего целого числа и присваиваем округленное значение переменной rounded типа integer (целое число). Наконец, мы выводим исходное значение x и его округленное значение rounded на экран.