Изосим
5 год назад
Решение задач на программирование линейных процессов: (1) Покупатель купил n планшетов по цене C1 руб за единицу,а также m штук компьютерных мышей по цене С2 руб за единицу.На весь товар ему сделают скидку 7%, если стоимость покупки будет не менее 10 000 рублей.Как узнать сколько денег должен заплатить покупатель?
ОТВЕТЫ
Онуфрий
Oct 24, 2020
//PascalABC.NET 3.2 сборка 1318
Var
c1,c2,n,m:integer;
begin
readln(c1,n,c2,m);
if c1*n+c2*m>=10000 then writeln((c1*n+c2*m)*0.93) else writeln(c1*n+c2*m);
end.
2
2500
4
1250
9300
Var
c1,c2,n,m:integer;
begin
readln(c1,n,c2,m);
if c1*n+c2*m>=10000 then writeln((c1*n+c2*m)*0.93) else writeln(c1*n+c2*m);
end.
2
2500
4
1250
9300
966
Смежные вопросы:
