• скидка в 10% предоставляется, если сумма покупки больше 1000 (программа в паскалье)

Ответы 1

  • uses crt;var summa:real;begin clrscr;write('Введите сумму покупки'); readln(summa);if summa>1000 thenbeginwriteln('Вам предоставляется скидка 10%');   writeln('Сумма покупки с учетом скидки: ',summa*0.9:0:2,' гривен.');endelse writeln('Скидка не предоставляется'); write('Для завершения нажмите Enter'); readlnend.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years