В одній державі податкова система виглядала так:
Податок становив 1% від доходу громадянина, але при цьому:
Якщо при обчисленні 1% виходило ціле число, то податок становить саме це ціле число.
Якщо при обчисленні 1% виходить дробове число (не важливо, чому дорівнює дрібна частина - просто виходячи з факту її наявності) - то податок становить цілу частину відсотка + 1.
Наприклад: якщо дохід становить 300 тугриків, то 1% дорівнює 3 і податок теж 3. Якщо дохід становить 315 тугриків, то 1% дорівнює 3,15, а податок дорівнює 4.
Труднощі в учасників олімпіади викликав той момент, що округлення за правилами математики в даному випадку не задовольняють умові завдання.
Рішення:
Вводимо дохід громадянина.
Перевіряємо наявність дробової частини в 1%.
Напружуємося, і згадуємо, що 1% можна отримати, розділивши число на 100.
Напружуємося 2, згадуємо, що div дозволяє отримати цілу частину від ділення, а mod виводить ЗАЛИШОК від ділення.
program z10_1_2016;
var
a,b:integer;
begin
Writeln('Vvedite dohod gragdanina');
readln(a);
if (a mod 100>0) then b:=(a div 100)+1
else b:=(a div 100);
writeln('Procent naloga sostavljaet ',b);
end. | 