Question

Составить программу вычисления стоимости покупки с учётом скидки. Скидка в 10% предоставляется, если сумма покупки больше 1000 рублей.

Ниже предоставлен рекомендуемый вид экрана во время работы с программой

Введите сумму покупки 1200

Сумма покупки с учётом скидки 1080

Answer 1

точно не уверен но вроде так:

var
 s:real;
begin
writeln ('Введите сумму покупки: ');
readln(s);
if s>1000 then
begin
writeln('Сумма покупки с учётом скидки: ',s*0.9:0:2,' руб.');
end
else
writeln('Сумма покупки: ',s:0:2,' руб.');
end.

Answer 2

забыл

Answer 3

ты не сюда пиши, а в ответ свой. И формулу расчёта подредактируй

Answer 4

готово

Answer 5

я просто начинающий, чайник :D пол года как занялся программированием

Answer 6

бывает