Многие банки при оплате покупок их банковскими картами предлагают систему возврата части
потраченных средств, называемую cashback.
мама алёны имеет три подобные карты с разными условиями возврата части потраченной сум-
мы. на карту банка rr возвращается 5 рублей из каждых полных 100 рублей стоимости одной
покупки. например, 5 рублей возвращается и за покупку стоимостью 100 рублей, и 199 рублей.
банк bb возвращает 2 рубля с каждых 50 рублей покупки, и за покупку стоимостью 199 рублей
он вернет уже 6 рублей. а банк мм возвращает 3% с полной стоимости любой покупки (заметим,
что при цене в целом числе рублей, 3% всегда будут составлять целое число копеек), поэтому за
покупку в 199 рублей вернется 5 руб. 97 коп.
алёна любит ходить вместе с мамой за покупками. мама предложила алёне определять, какую
покупку какой картой оплачивать, чтобы сумма возврата была максимально возможной. считайте,
что оплата любой покупки возможна любой картой. если какие-то две или все три карты
лучшую сумму возврата с точностью до копеек, то алёна выбирает ту из карт, которая ей больше
нравится по оформлению. больше всего алёна любит карту банка mm, затем идёт карта банка bb,
а меньше всего алёне нравится карта банка rr.
формат входных данных
вводится одно целое число s (1 ⩽ s ⩽ 10 000) — стоимость покупки в рублях.
формат выходных данных
выведите название банка rr, bb или mm в зависимости от того, картой какого банка выгоднее
оплатить эту покупку. а при равенстве суммы возврата — название банка, определённого в условии
.
плез
var
a,x,b,c: real;
begin
write('Введите стоимость покупки = ');
readln(x);
a := x/100;
a := Trunc(a);
a := a*5;
b := x/50;
b := Trunc(b);
b := b*2;
c := x*0.03;
if (a>b)and (a>c)
then
writeln('RP')
else
if (b>a) and (b>c)
then
writeln('BB')
else
if (c>a) and (c>b)
then
writeln('MM')
else
writeln('Суммы равны, Алена выбирает <MM>')
end.