Составить программу вычисления стоимости покупки с учётом скидки. Скидка 3% предоставляется в том случае, если сумма покупки больше 500 рублей, 5% - если сумма больше 1000 рублей. В результате вывести итоговую стоимость покупки и размер предоставленной скидки.
Var s:integer;
begin
write(Стоимость покупки = ); readln(s);
if s>1000
then writeln(Скидка 5% (,s*0.05, руб.), необходимо заплатить ,s*0.95)
else if s>500
then writeln(Скидка 3% (,s*0.03, руб.), необходимо заплатить ,s*0.97)
else writeln(Скидки нет);
end.
Пример:
Стоимость покупки = 600
Скидка 3% (18 руб.), необходимо заплатить 582
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
