Если сумма налога исчисляется в рублях и копейках, то налоговая служба округляет её до ближайшего рубля (до 50 копеек — с недостатком, свыше 50 копеек (включая 50) — с избытком). Используйте компьютер, чтобы ввести точную сумму налога и вывести сумму, которую следует уплатить.
Будем вводить рубли и копейки отдельно целыми числами, где копеек от int из таблицы round переводит полученное целое значение вещественного типа в целочисленное.
var
rub, kop, payment: integer;
begin
readln(rub, kop);
payment := round(int(rub + kop / + . ));
writeln('К уплате: ', payment, ' руб.')
end.
Первая строка считывает точную сумму двумя целыми компонентами. Вторая прибавляет половину рубля и отбрасывает дробную часть, реализуя правило задачи без ветвления. Последняя выводит сумму в целых рублях.
Проверим обе стороны границы. Для
Нужно вывести целую часть суммы «точный налог в рублях +
