Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
мага05051
11.04.2021 19:04 •
Информатика
Написать программу вычисления стоимости покупки с учётом скидки: скидка в 10% предоставляется, если сумма покупки > 1000 руб.
Ответ:
euno
27.05.2020 03:04
var a:real;
begin
readln(a);
if a>1000 then a:=a*0.9;
writeln(a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
sirghost743
26.01.2021 17:09
Написать программу вычисления на языке С++ За 2 часа автомобиль проехал 96 км, а велосипедист за 6 часов проехал 72 км. Во сколько раз автомобиль двигался быстрее велосипедиста?...
RL228
06.01.2020 13:23
Как сделать полукруг по горизонтали в паскале авс?...
макс17281
15.12.2022 18:07
Каковы мотивы конструирования вычислительных ...
Ivanvipmarhade
21.02.2021 04:18
Сколько существует различных последовательностей из символов «+» и «–» длиной ровно три символа? постройте схему и выпишите эти последовательности...
antoshaskoroboanton
27.02.2020 17:29
Составить 5 вопросов начинающихся с почему. гляжу в окно: уж гаснет небосклон, прощальный луч на вышине колонн, на куполах, на трубах и крестах блестит, горит в обманутых...
Pryanya11
27.02.2020 17:29
Мы умножить все однозначным числа на 9.как меняется число десятков? как меняется число единиц?...
artyom2980
27.02.2020 17:29
Составьте 20 или 25 слов с разными ж.р м.р ср.р например мышь (ж,р) шампунь (м,р) солнце (ср,р)...
MilkaKamilka5
27.02.2020 17:29
Положительный заряд q=4*10^-8 кл создаёт электрическое поле. напряжённость поля в точке а, удалённой на расстояние l= 8 см, равна...
mrarmen1999mailru
27.02.2020 17:29
Какие поступки вы могли бы назвать справедливыми?...
helsey
27.02.2020 17:29
Решите уравнение: 34*(m+1,2)=61,2 напишите решение и ответ....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a:real;
begin
readln(a);
if a>1000 then a:=a*0.9;
writeln(a);
end.