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

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

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

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

забыл

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

готово

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

бывает

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