logo
Войти Регистрация Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
17bazilik17
17bazilik17
20.12.2020 17:36 •  Информатика

Сумма покупки составляет а-рублей, если а> 1000 то предоставляется скидка 15% вывести на экран сумму покупки с учетом скидки,либо сообщение о том ,что скидка не предоставляется ( сделать ! )

Показать ответ
Ответ:
polinakoshara03
polinakoshara03
03.08.2020 12:57
If a>1000 then
b:=a*0.15;
a:=a -b;
write(a);
else 
write('скидки нет');
End.
0,0(0 оценок)
Популярные вопросы: Информатика
Ibrolya
Ibrolya
31.10.2022 12:14
Складіть проект, у якому виконавець, поки до нього не доторкнеться миша, буде повторювати такі дії: рухатися вправо, якщо буде натиснуто клавішу стрілка вправо, або...
irina197505
irina197505
07.09.2020 18:10
Поставлю лучший; ответьте на вопросы, хотя бы на один, 3. что общего у пиктограммы и символа? в чём между ними различие? предложите свою систему пиктограмм для основных...
3класс49
3класс49
25.04.2023 07:43
Марату необходимо выполнить быстрый переход в конец текста, выбери необходимую комбинацию клавиш. Alt + End Shift + End Ctrl + End...
lazmax2000
lazmax2000
15.04.2023 23:28
Планета обращается вокруг Солнца по круговой орбите в плоскости эклиптики. Ее синодический период составляет ровно 1 год. Найти радиус...
semakina97
semakina97
15.04.2023 23:28
Была ли на ваш взгляд неизбежной ликвидация режима сегуната в Японии Охарактеризуйте причины ход и последствие проникновение иностранцев в Китай....
Znanijaetosila1
Znanijaetosila1
15.04.2023 23:28
Среднее расстояние от Меркурия до Солнца - 0,4 а. е., среднее расстояние от Плутона до Солнца — 40 а. е. Во сколько раз Солнце ярче для наблюдателя...
1Гуннер32пт
1Гуннер32пт
15.04.2023 23:28
Можно ли верить сообщениям о визуальных наблюдениях спутника Марса Деймоса во время великого противостояния 2003 года в телескоп диаметром...
tambovtsevanat
tambovtsevanat
15.04.2023 23:28
В каких пределах может меняться угол максимальной элонгации Меркурия, если большая полуось его орбиты равна 0,387, а эксцентриситет ~0,2...
Anjelika222
Anjelika222
15.04.2023 23:28
Оцените, детали какого размера можно было наблюдать на поверхности Марса во время великого противостояния 2003 года (радиус Марса 3400...
tatianani
tatianani
15.04.2023 23:28
Орбита Венеры близка к окружности с радиусом 0,723 а.е., плоскость орбиты планеты образует с плоскостью орбиты Земли угол 3,4°....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота