Ответы на вопрос:
Var a: real; begin while a < = 1000 do begin writeln('введите сумму покупки > 1000р'); readln(a); if a > 1000 then break else writeln('ошибка! введенная сумма покупки < = 1000p'); end; writeln('стоимость покупки с учетом скидки 10%: ', a * 0.9); end. данная программа проверяет, больше 1000 или нет, введенная стоимость покупки. можно сделать проще без проверки: var a: real; begin writeln('введите сумму покупки > 1000р'); readln(a); writeln('стоимость покупки с учетом скидки 10%: ', a * 0.9); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Ladinikit11.06.2022 12:34
-
Mehriban200710.07.2020 21:10
-
sem21216.01.2020 16:51
-
Mayramukovsaid16.12.2020 19:02
-
Pingvinenok0108.06.2021 03:19
-
bodnari2121bodn17.01.2020 06:04
-
18alinochka15001.02.2022 14:27
-
нюра5558722.12.2022 20:53
-
Stasikone22.04.2020 16:11
-
Catandgog09.11.2022 07:39
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.